Zugriff auf Shapes
Da ein Shape sowohl auf dem Zeichenblatt als auch als Master-Shape in einer Schablone liegen kann, muss genau geklärt werden, auf welches Shape an welchem Ort zugegriffen wird.
Master-Shapes in einer Schablone
Wird auf eine Schablone zugegriffen, kann man auch auf dortige Master-Shapes zugreifen. Die Anweisung
Documents(i).Masters.GetNames
übergibt die Namen aller Master-Shapes an ein Array, wenn es sich bei Documents(i) um eine Schablone handelt. Das folgende Beispiel durchläuft alle Dateien, überprüft, ob es sich um Schablonen handelt, und zeigt deren Master-Shapenamen an:
Sub MastersAnzeigen() Dim intMaster As Integer Dim intDokumente As Integer Dim strMasternames() As String Dim strAusgabe As String For intDokumente = 1 To Documents.Count ...
Get Microsoft Visio 2013 - Das Handbuch now with O’Reilly online learning.
O’Reilly members experience live online training, plus books, videos, and digital content from 200+ publishers.