Закрепление области через VBA

DemoN

Здравствуйте.
Подскажите, кто как через VBA закрепляет область в рабочей книге?
Код:

Code:

  Range("A5").Select
  ActiveWindow.FreezePanes = True

Закрепляет почему-то только 1 строчку

Lench

У меня этот код закрепил первые 4 строчки

DemoN

А если перезайти в книгу?
Осталось также 4 строчки?
..
у меня после перезахода "слетает" на 1-ю.

Lench

Нормально все работает
Сделал стартовый макрос, настроил книгу на его запуск
Вставил в стартовый макрос этот код.
Сохранил рабочую книгу
Закрыл, открыл рабочую книгу
Как было закреплено 4 строки сверху так и осталось

А у вас каждый раз разное количество строк нужно закреплять?

DemoN

Lench написал:

...
А у вас каждый раз разное количество строк нужно закреплять?

Нет, количество строк не меняется.

Решение нашлось

, хотя непонятно в чем было дело..
Помогла вставка строки сначала со снятием закрепления. Вот итоговый код:

Code:

  Range("A5").Select
  ActiveWindow.FreezePanes = False
  ActiveWindow.FreezePanes = True

Спасибо за участие.

Lench

А если количество закрепляемых строк не меняется, тогда зачем вообще через VBA закреплять? Просто закрепили бы область и сохранили рабочую книгу

DemoN

Lench написал:

А если количество закрепляемых строк не меняется, тогда зачем вообще через VBA закреплять? Просто закрепили бы область и сохранили рабочую книгу

Потому что мы вначале кода VBA делаем Cells.Delete и закрепление "слетает".

Закрепление области через VBA

Кто сейчас на конференции