Object Model Reference : Classes : N : NodeRange : Methods : NodeRange.Skew |
Sub Skew([AngleX As Double], [AngleY As Double], [UseAnchorPoint As Boolean = False], [SkewAnchorX As Double], [SkewAnchorY As Double])
Member of NodeRange
The Skew property skews the nodes in a node range as though the node range were a separate shape object.
The following VBA example skews the node range in the active shape horizontally and vertically by 25°. A reference point is not set, but the anchor point is set at (0, 0).
Sub Test() |
Dim nr as NodeRange |
Set nr = ActiveShape.Curve.Nodes.All |
With nr |
.Skew 25, 25, False, 0, 0 |
End With |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.