Как сделать так, что бы выполнялось условие: Если ячейка G58 пустая то при нажатии на макрос "печать" выводилось предупреждающее окно с тем, что данная ячейка незаполненная, если все нормально, и ячейка не пустая, то производилась печать. Спасибо!
Добрый день, у меня вопрос, есть макрос вот такой: [vba]
Как сделать так, что бы выполнялось условие: Если ячейка G58 пустая то при нажатии на макрос "печать" выводилось предупреждающее окно с тем, что данная ячейка незаполненная, если все нормально, и ячейка не пустая, то производилась печать. Спасибо!temnoo
Сообщение отредактировал Serge_007 - Воскресенье, 27.09.2015, 10:14
а как запустить подряд два листа печатать "печать" и "квитанция", с этим же условием.
[vba]
Код
Sub Макрос1()
Dim shAct As Worksheet
Set shAct = ActiveSheet
If shAct.Range("G58").Value = "" Then MsgBox "Ячейка G58 пустая." Exit Sub Else Sheets("печать").PrintOut Copies:=2, Collate:=True Sheets("квитанция").PrintOut Copies:=2, Collate:=True End If
а как запустить подряд два листа печатать "печать" и "квитанция", с этим же условием.
[vba]
Код
Sub Макрос1()
Dim shAct As Worksheet
Set shAct = ActiveSheet
If shAct.Range("G58").Value = "" Then MsgBox "Ячейка G58 пустая." Exit Sub Else Sheets("печать").PrintOut Copies:=2, Collate:=True Sheets("квитанция").PrintOut Copies:=2, Collate:=True End If
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
