Идентификация листов

[tae1980]

Есть книга, с большим количеством листов. Все листы можно сгруппировать в ряд видов (даже не знаю как это назвать):
* данные на объект
* договор 1
* договор 2
* межевой план 1
* межевой план 2
* и т.п. и т.д.
Хочется одновременно видимыми только листы одного вида. На данный момент это делаю путем добавления в начале названия листа индекса. Например:
* ДГхх - договор (ДГ01 Договор/ДГ01 Акт выполненых работ)
* МПхх - Межевой план (МП01 таб.1/МП01 табл.2/МП01 Акт согласования границ)
* СРхх - Схема расположения
* и т.п.
Где хх - порядковый номер вида одно видовых документов. (на один объект может быть сформировано по несколько договоров и иных пакетов документов).
Все работает, но не очень эстетично.
Можно то же сделать иными средствами?

[motorway]

"Индификация" - это, конечно, интересно Идентификация?
Можно в макросе анализировать лист на наличие каких-то признаков, свойственных только листам данного вида. Или тоже как-то отталкиваться от названия, прописав либо фикс. массив листов, либо правила обработки названия в случае их динамического создания, и на основе этого делать скрытие.

[tae1980]

Сообщение от motorway

"Индификация" - это, конечно, интересно Идентификация?

Исправил.

Сообщение от motorway

Можно в макросе анализировать лист на наличие каких-то признаков, свойственных только листам данного вида. Или тоже как-то отталкиваться от названия, прописав либо фикс. массив листов, либо правила обработки названия в случае их динамического создания, и на основе этого делать скрытие.

Хотел использовать кодовые имена листов, но они не доступны для макросов расположеных в других книгах.

[motorway]

Еще вариант - присваивать цвет ярлычкам листов, а затем фильтровать по ним. Также можно сохранять какую-то информацию о листах в текстовый файл.

[tae1980]

Сообщение от motorway

Еще вариант - присваивать цвет ярлычкам листов, а затем фильтровать по ним. Также можно сохранять какую-то информацию о листах в текстовый файл.

Цветом - точно не хватит. :)
Текстовый файл - выход, но это дополнительныя структура - а значит потенциальное место сбоя.
Я думал у листов могут быть дополнительные скрытый "поля" в которых можно хранить данные для идентификации. Но в этом случае появляется проблема листов с одним именем.
Похоже иного решения нет. :((

[motorway]

Создать листы с одинаковыми названиями не получится в любом случае.
В принципе, можно хранить данные о листе в примечании к к-н. ячейке на нем.
А цветов много, у вас типов листов тоже много так?

[аналитика]

как альтернатива примечанию на каждом листе - для каждого листа создать имя (для каждого одно и то же, напр., Tag) уровня листа, которое будет хранить информацию о принадлежности листа к тому или иному виду, а потом что-нибудь в этом духе:

Sub ddd()
   For Each sh In Worksheets
      For Each n In sh.Names
         MsgBox n.Name, , n
      Next
   Next
End Sub

[tae1980]

Сообщение от motorway

Создать листы с одинаковыми названиями не получится в любом случае.
В принципе, можно хранить данные о листе в примечании к к-н. ячейке на нем.
А цветов много, у вас типов листов тоже много так?

Типов пока только четыре, но это не предел. Но документы одного типа могут встречаться несколько раз, то есть может быть два и более договора и т.п. При чем я не знаю "карту листов", и каждый раз просматриваю все листы. Такой подход требует непрерывную нумерацию (МП01, МП02, МП03 и т.п.). Что создает преблемы при удалении пакета готовых листов. Скажем при удалении МП02, придется переименовывать МП03 в МП02. С точки зрения программы проблема не особо острая, а вот у пользователя данная операция может вызывать путаницу (вроде удалил МП02, а пропал МП03). Это одна из причин почему я пытаюсь найти иные пути решения. От номерации пакетов листов пока не уйти, т.к. номер текущего пакета листов задется пользователем путем выбора его названия в специально созданом меню. А номер пакета я определеяю через порядковый номер выбраного пункта меню.