Страницы: 1
RSS
Скрыть строку на всех листах
 
Привет!

Необходимо скрыть одну строку (первую) на всех листах, находящихся в книге. Диапазон листов указывать долго, так как их довольно много.
К сожалению, пример ниже не помог решить задачу:
Код
Sub test()
Dim sh as Worksheet
For Each Sh In ThisWorkbook.Worksheets
    Sh.Rows('1:1').EntireRow.Hidden = True
Next
End Sub
Чего-нибудь другого, подходящего под условия я не нашла.
 
возьмите в вашем коде "1:1" в кавычки
 
Код
 sh.Rows("1:1").EntireRow.Hidden = True
 
yozhik, Kuzmich, большое спасибо, все работает.
 
Можно без макроса:
1. "Мышу" подвести к ярлыку любого листа - "Выделить все листы".
2. На активном листе (в сгруппированных листах в данный момент) выделить Ваш диапазон строк для скрытия и скрыть их.
3. "Мышу" подвести к ярлыку любого листа - "Разгруппировать листы".
Страницы: 1
Наверх