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 if the node range is a separate shape object.


Parameters	Description
AngleX	Specifies the degree in which to horizontally slant the node range This parameter is optional, and its default value is 0.
AngleY	Specifies the degree in which to vertically slant the node range This parameter is optional, and its default value is 0.
UseAnchorPoint	Specifies whether to use an anchor point This parameter is optional, and its default value is False.
SkewAnchorX	Specifies the x-coordinate of the anchor point when skewing the node range. This value is measured in document units. This parameter is optional, and its default value is 0.
SkewAnchorY	Specifies the y-coordinate of the anchor point when skewing the node range. This value is measured in document units. This parameter is optional, and its default value is 0.

The following code 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