Object Model Reference : Classes : S : Shape : Properties : Shape.SizeWidth |
Property SizeWidth As Double
Member of Shape
The SizeWidth property returns or specifies the horizontal size of a shape. Changing this property stretches the shape to accommodate the specified size.
• |
The following VBA example creates a rectangle around each shape on a page.
Sub Test() |
Dim s As Shape |
Dim x As Double, y As Double |
ActiveDocument.ReferencePoint = cdrBottomLeft |
For Each s In ActivePage.Shapes |
s.GetPosition x, y |
ActiveLayer.CreateRectangle2 x, y, s.SizeWidth, s.SizeHeight |
Next s |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.