Entries from 2016-09-07 to 1 day

How to find and set properties of shapes

VBA Visio.Shapes.Size and Appearance

Get and set the sizes of shapes [Shape Width] Shape.CellsSRC(visSectionObject, visRowXFormOut, visXFormWidth) Return: String (e.g. "10 mm") Shape.CellsSRC(visSectionObject, visRowXFormOut, visXFormWidth).FormulaU = String Shape.Cells("Widt…

Sample Code - Get the properties of the first shape selected and apply them to the other selected shapes

VBA Visio.Shapes.Cells.Property

Sub setSamePropertyOfPrimaryShape() Dim vsoSelection As Visio.Selection Dim primaryShape As Visio.Shape 'first selected shape Dim targetShape As Visio.Shape 'other selected shapes Dim primaryShapePropsCount As Integer ' the number of prope…