Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Объединить два кода - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Объединить два кода (Макросы/Sub)
Объединить два кода
MARINKA Дата: Пятница, 25.06.2021, 11:27 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день.
Помогите с кодом :help:
Есть два макроса для рассылки оутлук.
Выделяются необходимые ячейки в файле эксель-с помощью кнопок (тык или нет) запускается один из макросов.
Разница в вставляемом тексте в тело письма.
Как их объединить в один по условию: Если в выделенном фрагменте ячейки в столбце Е есть "нет" запускается один, если нет второй.
Как вписать в код формулу
Код
=ЕСЛИ(ЕОШИБКА(ПОИСК("нет";E2));G2;"")
, и с указанием не на конкретные ячейки, а ячейки в столбцах E и G в выделяемом фрагменте
if range
Код
=ЕСЛИ(ЕОШИБКА(ПОИСК("нет";E2));G2;"")
then
макрос 1
else
макрос 2
end if
end if

Спасибо.
К сообщению приложен файл: 4102987-1-.xls (56.5 Kb)


Сообщение отредактировал MARINKA - Пятница, 25.06.2021, 13:05
 
Ответить
СообщениеДобрый день.
Помогите с кодом :help:
Есть два макроса для рассылки оутлук.
Выделяются необходимые ячейки в файле эксель-с помощью кнопок (тык или нет) запускается один из макросов.
Разница в вставляемом тексте в тело письма.
Как их объединить в один по условию: Если в выделенном фрагменте ячейки в столбце Е есть "нет" запускается один, если нет второй.
Как вписать в код формулу
Код
=ЕСЛИ(ЕОШИБКА(ПОИСК("нет";E2));G2;"")
, и с указанием не на конкретные ячейки, а ячейки в столбцах E и G в выделяемом фрагменте
if range
Код
=ЕСЛИ(ЕОШИБКА(ПОИСК("нет";E2));G2;"")
then
макрос 1
else
макрос 2
end if
end if

Спасибо.

Автор - MARINKA
Дата добавления - 25.06.2021 в 11:27
китин Дата: Пятница, 25.06.2021, 12:21 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 7013
Репутация: 1073 ±
Замечаний: 0% ±

Excel 2007;2010;2016
MARINKA, в файле макросы отсутствуют от слова совсем


Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
СообщениеMARINKA, в файле макросы отсутствуют от слова совсем

Автор - китин
Дата добавления - 25.06.2021 в 12:21
MARINKA Дата: Пятница, 25.06.2021, 12:31 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
в файле макросы отсутствуют от слова совсем
исправила
 
Ответить
Сообщение
в файле макросы отсутствуют от слова совсем
исправила

Автор - MARINKA
Дата добавления - 25.06.2021 в 12:31
китин Дата: Пятница, 25.06.2021, 12:33 | Сообщение № 4
Группа: Модераторы
Ранг: Экселист
Сообщений: 7013
Репутация: 1073 ±
Замечаний: 0% ±

Excel 2007;2010;2016
MARINKA, - Прочитайте Правила форума
- Оформите формулу тегами (в режиме правки поста выделите формулу и нажмите кнопку fx, пояснялка здесь)
Помогающим просьба воздержаться от ответов в этой теме до исправления замечания


Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
СообщениеMARINKA, - Прочитайте Правила форума
- Оформите формулу тегами (в режиме правки поста выделите формулу и нажмите кнопку fx, пояснялка здесь)
Помогающим просьба воздержаться от ответов в этой теме до исправления замечания

Автор - китин
Дата добавления - 25.06.2021 в 12:33
MARINKA Дата: Пятница, 25.06.2021, 13:05 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
- Оформите формулу тегами

готово
 
Ответить
Сообщение
- Оформите формулу тегами

готово

Автор - MARINKA
Дата добавления - 25.06.2021 в 13:05
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Объединить два кода (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!