Change the .Name and .NameU

[Scott]

I have a set of stencils (.vss file) and I need to change the .Name and
..NameU values of each master to be something different that what it is now.
Is there any way to do that?

 

[Chris Roth [ Visio MVP ]]

VBA!

Sub DoIt
dim stn as Visio.Document
set stn = Visio.Documents("MyStencil.vss") ' your stencil should be
open!
dim mst as Visio.Master
For each mst in stn.Masters
mst.NameU = mst.Name ' or whatever you want to do
Next
End Sub

--

Hope this helps,

Chris Roth
Visio MVP