Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » artem2597
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Активация листа Sheets.Activate в событии Workbook_BeforePrint, Не получается активировать лист при вызове процедуры с активацией листа из события Workbook_BeforePrint
 
#
02.03.2026 18:19:31
Перед печатью книги необходимо вызвать процедуру, которая "подготавливает" книгу под печать. Вызываемая процедура проходится по каждому листу определенного типа (только по тем листам, названия которых является числами), и записывает внесенные изменения пользователем перед печатью.
 
Перейти    
Активация листа Sheets.Activate в событии Workbook_BeforePrint, Не получается активировать лист при вызове процедуры с активацией листа из события Workbook_BeforePrint
 
#
02.03.2026 17:59:11
Добрый день! Подскажите, пожалуйста, как активировать лист из события книги Workbook_BeforePrint, если событие печати книги вызывает другая процедура (Sub Start). При обычном методе активации через Sheets.Activate ничего не происходит.

Ниже прилагаю код события Workbook_BeforePrint:
Код
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Call Test
End Sub
Код в обычном модуле:
Код
Sub Start() 'старт программы
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
End Sub

Sub Test() 'вызывается из процедуры Workbook_BeforePrint
Sheets(3).Activate '!!! проблема здесь, лист 3 не хочет активаироваться (не только он, но и любой другой)
End Sub
Изменено: artem2597 - 02.03.2026 18:00:06
 
Перейти    
Страницы: 1
Наверх