Object Model Reference : Classes : S : Shape : Properties : Shape.AbsoluteHScale
|
|
| Object Model Reference : Classes : S : Shape : Properties : Shape.AbsoluteHScale |
Property AbsoluteHScale As Double
Member of Shape
The AbsoluteHScale property returns the absolute horizontal-scaling value of a shape. The returned value represents the total stretch transformation applied to the shape since its creation.
The AbsoluteHScale property returns a read-only value.
The following VBA example displays a warning message if the active shape has been stretched horizontally or vertically (or both).
Sub Test() |
If ActiveShape.AbsoluteHScale <> 1 Or ActiveShape.AbsoluteVScale <> 1 Then |
MsgBox "The current shape is distored" |
End If |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.