Application.SmartArtLayouts property (Word)
Returns a SmartArtLayouts object that represents the set of SmartArt layouts that are currently loaded in the application. Read-only.
Syntax
expression. SmartArtLayouts
expression An expression that returns a 'Application' object.
Remarks
The set of layouts represented by the SmartArtLayouts property correspond to the available layouts in the Layouts group on the Design tab on the SmartArt Tools contextual tab in Word.
Example
The following code example adds a SmartArt graphic to the active document and then sets the SmartArt graphic layout to "Grouped List".
Dim myShape As Shape
Dim mySmartArt As SmartArt
Set myShape = ActiveDocument.Shapes.AddSmartArt(Application.SmartArtLayouts(1), 50, 50, 200, 200)
Set mySmartArt = myShape.SmartArt
mySmartArt.Layout = Application.SmartArtLayouts(15)
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.