Hello,

I'm writing a vba macro for Word where I create some SmartArt. I can change dynamicaly the size of the SmartArt withount problem for example with the code :

Set WdSmartArtLayout = Application.SmartArtLayouts(1)
Set MySmartArt= ActiveDocument.Shapes.AddSmartArt(WdSmartArtLayout)
MySmartArt.Height=300
but I can't manage to find the proper syntax to change the size of the individual forms inside the SmartArt and the gap between them. Firstly I thought I had understood how to address those kind of properties, for example with the color of the border of the first form inside the SmartArt :

MySmartArt.SmartArt.Nodes(1).Shapes.Line.ForeColor.RGB = RGB(255, 255, 255)
This code works well. But when i try to apply this to the width or height, this property apparently doesn't exist :

MySmartArt.SmartArt.Nodes(1).Shapes.Height=200
So does anyone could help me to find the good syntax to change Height, Width and "Gap" of the forms (node) indise a SmartArt ?

Thank you very much for your help