| Name | Type | Description |
|---|---|---|
| DeltaX |
Double
|
Specifies the horizontal offset. |
| DeltaY |
Double
|
Specifies the vertical offset. |
Sub Test() Dim spath As SubPath For Each spath In ActiveShape.Curve.Subpaths spath.Move Rnd() * 2 - 1, Rnd() * 2 - 1 Next spath End Sub