Recent Posts

Pages: 1 ... 8 9 [10]
Programming & Code / How to change textbox font using name of font?
« Last post by matthew on July 22, 2020, 01:58:24 PM »
I was hoping to use the name of the font rather than the macro code:
Application.ActiveWindow.Page.Shapes.ItemFromID(Milestone(X, 21)).CellsSRC(visSectionCharacter, 0, visCharacterFont).FormulaU = "523"
Is there a way of using the font name e.g. "Wingdings 2"?
Programming & Code / Save to another Visio file
« Last post by matthew on July 22, 2020, 01:09:51 PM »
Can someone tell me how to save my .vsdm file as another Visio file without the code while keeping the coded one open?  Also, when saving the other file how do I know if I can save it as a .vsdx file?
I was hoping I could use .SaveCopyAs but I get the error message ‘method or data member not found’.  [ThisDocument.SaveCopyAs (thisPath)]
Any advice would be much appreciated.
General Visio / Printing layers to PDF
« Last post by ReedBeatse on July 22, 2020, 12:50:15 PM »
For a number of years, I have been printing my Visio drawings with multiple layers using the Adobe Acrobat plug-in that creates a new menu and allows to choose if I keep layers or flatten the drawing.  When I moved to Office 2016, my IT department found that the plug-in did not work with Visio and so they found a workaround.  They installed the 32-bit version of Visio 2013 and then installed to 64 bit version of Office 2016 for everything but Visio.  This allowed me to keep the Acrobat menu and print my vsd/vsdx files and keep the layers in pdf format.

Now we are moving to Office 365 and so far no one has found a workaround that will keep the layers in pdf.

Does anyone know of either a setting within O365 Visio that will allow for the retaining of layers in pdf output or another pdf generator that works with Visio?  Or ANYTHING that would work?  My company relies on these documents (and their layers) very heavily.
Ok great so added automatically when a master uses a style! :)
Can I store styles in a stencil?
Yes, you can distribute your custom styles with stencils.
If you store shapes with custom styles in stencil. After when you drop masters from stencil which use custom style, this action add copy of this style to target Visio document!
Why are so many Visio goodies hidden from users by default?
IMHO two reasons:
1. Ribbon interface need space more than Classic interface, because there is large and middle-size buttons. For example when you activate all toolbars in Visio 2003, it contain only little icons.

2. MS mean that all these hidden goodies are obsolete !
Can I store styles in a stencil?
Thank you Surrogate this is exactly what I'm looking for! Why are so many Visio goodies hidden from users by default?
My answer in thread about Styles in Visio
If you use Visio 2016/2019 or Visio Online Plan 2 you can write letters 'def' in field 'Tell me what do you want to do'

If you use Visio 2010/2013 look at answer in that thread in SuperUser forum.

In 'Define style' window you must enter some name for your style and after that you must press button 'Add'
I create custom style named 'ololo' this simple code apply change style for selected shape
Dim sh As Shape
Set sh = ActiveWindow.Selection.PrimaryItem
sh.FillStyle = "Ololo"
sh.LineStyle = "Ololo"
sh.TextStyle = "Guide"
But only old-school Visio users remember about Styles!

Pages: 1 ... 8 9 [10]