Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
Отображение сразу всех скрытых листов
 
#1
22.10.2008 19:07:10
Здравствуйте. Извените если дублирую вопрос- но на форуме и в приемах ответ не нашел.  
 
Есть ли возможность отобразить сразу все скрытые листы? А не по одному ?
 
 
 
#2
22.10.2008 19:29:59
Попробуйте? удерживая Ctrl, выделить все Ваши видимые листы (если их не очень много). Затем меню Формат - Лист - Отобразить. Или макросом.
 
 
 
#3
22.10.2008 19:44:34
Вот такой макрос должен отобразить все листы  
Sub Show_All_Sheets()  
n = Sheets.Count  
For i = 1 To n  
  If Worksheets(i).Visible = False Then  
     Worksheets(i).Visible = True  
  End If  
Next  
End Sub
 
 
 
#4
23.10.2008 13:53:28
Спасибо, ушел проверять
 
 
 
#5
23.10.2008 13:59:38
вот так короче :)  
sub qq()  
dim a  
for each a in worksheets  
a.visible=true  
next  
end sub
 
 
 
#6
07.10.2011 14:24:23
Спасибо!
 
 
 
#7
07.10.2011 14:40:28
а что бы отобразить все все листы можно набрать в окне Immediate:  
 
for each s in sheets:s.visible=true:next  
 
и нажать Ентер
Редко но метко ...
 
 
 
Страницы: 1
Читают тему
Наверх