|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
16.05.2009, 23:03 | #1 |
Пользователь
Регистрация: 25.01.2009
Сообщений: 81
|
Условие для макроса
Доброго суток.
Записал макрос, который берет число из ячейки и делает необходимые операции с ним. Потом следующее и так далее, но в некоторых ячейках чисел может и не быть, а макрос будет их оттуда брать. Как поставить условие, что бы еслии нету числа то макрос пропускал эту ячейку и все операции связанные с ней. Так же условие по цвету. т.е. допустим красный цвет, не работает и выводит сообщение с текстом"бббббла" Спасибо. И еще один вопрос, тоже про условие макроса. В определенную ячейку вносим значение (допустим 1 или 2 или 3 или......), при нажатии кнопки для выполнения макроса, он взависимости от значения выполняет необходимое действие. еще раз спасибо Последний раз редактировалось sergiksergik; 16.05.2009 в 23:36. |
17.05.2009, 02:55 | #2 | ||
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Цитата:
Код:
Цитата:
Код:
|
||
17.05.2009, 21:00 | #4 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Замените строки
Код:
Код:
|
17.05.2009, 21:51 | #5 |
Пользователь
Регистрация: 25.01.2009
Сообщений: 81
|
Огромное спасибо... Всегда выручаете...
|
23.05.2009, 20:46 | #6 |
Пользователь
Регистрация: 25.01.2009
Сообщений: 81
|
Если ячейка А6 равна B4 то запускается Макрос 1
если нет то ничего Помогите, как это написать? |
23.05.2009, 20:50 | #7 | |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Цитата:
Код:
|
|
23.05.2009, 20:51 | #8 |
Форумчанин
Регистрация: 03.04.2009
Сообщений: 412
|
If [A6] = [A4] Then Application.Run "Макрос 1"
|
23.05.2009, 20:54 | #9 |
Пользователь
Регистрация: 25.01.2009
Сообщений: 81
|
Почти догадался сам (Then не вставлял...)
Спасибо... с меня за все пиво!!!! |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Условие для файлов | Nemesisking | Общие вопросы Delphi | 11 | 30.01.2009 09:20 |
Создание SetUp для макроса | Romuald | Microsoft Office Excel | 3 | 06.06.2008 12:23 |