Выполнение макроса при открытии (активации) листа

openid.mail.ru/mail/vlad3622340

Пользователь

Сообщений: 1125 Регистрация: 23.12.2012

28.06.2010 09:24:32

Доброго дня всем обитателям Планеты Excel!
Подскажите пожалуйста, как запустить код макроса при открытии листа?
Вставляю это в модуль листа, но ничего не сортируется.

Sub Worksheet_Open()
Range("J1").Select
Selection.AutoFilter Field:=1, Criteria1:="НА ПЕЧАТЬ"
End Sub

Как правильно сделать?
Извините, в макросах я новичок.

Прикрепленные файлы

post_134197.xls (64 КБ)

webley Пользователь Сообщений: 2176 Регистрация: 01.01.1970	#2 28.06.2010 09:33:58 Лист не открывают, а активируют :) Private Sub Worksheet_Activate()

webley Пользователь Сообщений: 2176 Регистрация: 01.01.1970	#3 28.06.2010 09:39:18 Сразу файл не посмотрел - поскольку лист у вас один, скорее всего имеется ввиду открытие книги. В модуль книги: Private Sub Workbook_Open() Sheets(1).Activate Range("J1").Select Selection.AutoFilter Field:=1, Criteria1:="НА ПЕЧАТЬ" End Sub

openid.mail.ru/mail/vlad3622340 Пользователь Сообщений: 1125 Регистрация: 23.12.2012	#4 28.06.2010 09:49:20 Спасибо большое, Webley! Sub Worksheet_Activate() работает! А я где-то вычитал, что Worksheet_Open и с этим мучился. Это в примере лист один, а в оригинале 6. После открытия книги другие листы изменяются вручную и влияют на этот лист. И вот после его открытия (АКТИВАЦИИ), должно сразу отобразиться то, что нужно печатать. Так что нужно именно в модуль листа. Вопрос решён. Ещё раз благодарю!

Читают тему