как написать макрос - Microsoft Office Excel

serggrodno · 03.02.2012, 17:50

Здравствуйте. Как сделать так, чтобы перед печатью листа, проверялась правильность заполнения определенных(некоторых) ячеек и в случае неправильного заполнения выводилось бы сообщение на экран, до тех пор , пока все не будет заполнено правильно.

Hugo121 · 03.02.2012, 18:03

Alt+F11, в модуль книги пишете такой код (первую строку можно выбрать из выпадающего списка в правом верхнем углу редактора):

Код:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.[a1] <> 1 Then MsgBox "ai-ai": Cancel = True
End Sub

Теперь даже предв. просмотр не получится, пока...

03.02.2012, 17:50	#1
serggrodno Новичок Джуниор Регистрация: 03.02.2012 Сообщений: 1	как написать макрос Здравствуйте. Как сделать так, чтобы перед печатью листа, проверялась правильность заполнения определенных(некоторых) ячеек и в случае неправильного заполнения выводилось бы сообщение на экран, до тех пор , пока все не будет заполнено правильно.

03.02.2012, 18:03	#2
Hugo121 Старожил Регистрация: 11.05.2010 Сообщений: 5,170	Alt+F11, в модуль книги пишете такой код (первую строку можно выбрать из выпадающего списка в правом верхнем углу редактора): Код: `Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.[a1] <> 1 Then MsgBox "ai-ai": Cancel = True End Sub` Теперь даже предв. просмотр не получится, пока... webmoney: E265281470651 Z422237915069 R418926282008

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
как написать макрос, который бы запускался с открытием книги?	БАХТИ	Microsoft Office Excel	6	25.09.2011 10:23
Как написать макрос на определение категории имея условие	Hoochara	Microsoft Office Excel	2	05.08.2011 10:21
Как написать макрос в Excel????	Маська	Помощь студентам	1	10.11.2010 16:36
как написать макрос и на чем?	Antrikot	Помощь студентам	10	10.08.2010 22:15
Как написать макрос на перемену данных в одной ячейке	nadia111	Microsoft Office Excel	4	19.12.2009 13:17