Страницы: 1
RSS
VBA. Узнать количество видимых листов в книге
 
Всем доброго здоровья!
При решении задачи возник вопрос - как проще узнать количество видимых листов в книге.
и ThisWorkbook.Sheets.Count и ThisWorkbook.Worksheets.Count дают полный счет листов; есть ли какой путь узнать, сколько видимых листов, помимо цикла по листам?
 
Перебираем листы: если видимый - добавляем единичку к счётчику.
 
off
Цитата
Михаил Витальевич С. написал:
помимо цикла по листам
-
Цитата
Юрий М написал:
Перебираем листы:
:D  
Нашли друг друга
По вопросам из тем форума, личку не читаю.
 
БМВ, off ) теперь я в Ваших обмишулившихся рядах)
Не бойтесь совершенства. Вам его не достичь.
 
Наверное, Миша дописал уже  позже. Или я пропустил.
 
Оff. Новое движение: антициклисты.
Изменено: sokol92 - 31.08.2020 14:34:39
Владимир
 
Off
Цитата
Юрий М написал:
Миша дописал уже  позже.
это только модераторы могут заменить текст без пометки о изменении.
По вопросам из тем форума, личку не читаю.
 
Миша, не придирайся к Юре.

По теме - думаю, без цикла никак. И циклов не нужно бояться, если это, конечно, не касается к обращениям к сотням и более ячейкам на листе
Изменено: New - 31.08.2020 15:24:04
 
Цитата
New написал:
Миша, не придирайся к Юре.
Вот-вот! )
 
Цитата
Юрий М написал:
Или я пропустил.
Пропустил :)
Цитата
New написал:
И циклов не нужно бояться,
а я их не боюсь - они очень быстрые, даже если обращаешься к десяткам тысяч, но не ячеек на листе, а к элементам массивов.
К ячейкам на листе обращаюсь в крайних случаях - только если по другому не возможно :)
Я просто не люблю их организовывать - много писанины :D ( а писать мне физически тяжело  :cry: )
В своей задаче я решил проще - я знаю, что у меня два скрытых листа-шаблона, и из общего числа отнимаю 2.

Спасибо всем откликнувшимся.  :)
 
Михаил Витальевич С., приветствую!
Если это как-то поможет, то можно одной командой отобразить все листы в книге (скрыть все нельзя), передав их индексы или имена ярлыков в массиве Worksheets(Array(1,2,3…N)).Visible = True

UPD: при беглой проверке у меня не получилось — возможно я попутал методы…
Изменено: Jack Famous - 01.09.2020 11:18:29
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
Цитата
Jack Famous написал:
Если это как-то поможет, то можно одной командой отобразить все листы в книге
- отличное решение Алексей. Теперь все листы видимы и количество их равно общему количеству :-)
По вопросам из тем форума, личку не читаю.
Страницы: 1
Наверх