Для русскоязычных пользователей Visio. Начинающих и профессионалов. Где взять, как сделать, что купить и т.д.

Слои

Перечень литературы

13.12.2018  Controlling Visio layers with linked data  David Parker.   

24.10.2018  Fixing the layers problem with callouts in Visio  David Parker.   

01.01.2017  Use layers  Colby West.   

26.02.2014  Selecting Shapes by Layer  Jeremy Stretch.   

04.09.2012  Assigning Shape Layers from a List in Visio  David Parker.   

09.05.2011  Using Layers in Visio packet  Jeremy Stretch.   

26.03.2004  Microsoft Office Reference Guide  Tom Bunzel.   

01.01.1900  Visio layer automatic highlighter  Julien.   

Ответы на вопросы

Как расслоить большую схему?

Есть большая схема сети (ЛВС). Хочу расслоить её, так, чтобы по желанию можно было смотреть или только серверы, или только коммутаторы, или только маршрутизаторы и т.д. по моему усмотрению.
В Help-е предлагается править шейпы в Stencil. А уж из исправленного Stencil-а делать схему. Этот вариант работает, но мне не подходит, т.к. готовая схема большая и объекты нафаршированы свойствами. Есть ли возможность слоить готовый рисунок? 

Назначить слои мастерам в локальном трафарете и все. Мастеру Server, к примеру, назначить слой Servers. 

1) Сделал слой Servers (как help-е)
2) Зашёл в режим редактирования Stencil-а (я правильно понимаю, что это и есть "локальный трафарет", о котором Вы писали?) Название - Stencil Basic Network Shapes 3D
3) Говорю Edit Master
4) Правой клавишей мыши по мастеру -> Format -> Имя Layer-a
5) всё сохраняю.
Что неправильно? 

Не тот трафарет. Локальный трафарет формируется из всех мастеров, когда-либо помещавшихся на лист.
Его можно вызвать из File>Stencils>Document Stencil. В него и надо вносить изменения. 

Макрос для управления слоем

Хотелось бы привязать к кнопке свойства вызова окна выбора слоя или закрепить за ней отображение определенного слоя.
Знает ли кто, как это сделать в visio 2000 

Вот фрагмент кода, выполнявшийся в Add-on. Управляет свойством visLayerVisible (включает/выключает по очередному нажатию кнопки). 

If mode = 102 Then 'Layer IP Network Configuration
Set objCell = aV.ActivePage.Layers.Item("IP Network Configuration").CellsC(4)
If Not (objCell Is Nothing) Then
If objCell = 0 Then
objCell = 1
Else
objCell = 0
End If
End If
End If 

Каждая кнопка запускает Add-on со своим параметром mode.
.CellsC(4) это как раз visLayerVisible