Shape.Adjustments Property (Publisher)
Returns an Adjustments collection representing all adjustment handles for the specified Shape or ShapeRange object.
Syntax
expression .Adjustments
expression A variable that represents a Shape object.
Remarks
Adjustment handles correspond to Microsoft Publisher shape sliders.
Example
This example takes the number of adjustments for a given shape range and assigns it to a variable.
Public Sub Counter()
Dim intCount as Integer
' A Shape must be in the active publication and selected.
intCount = Publisher.ActiveDocument.Selection _
.ShapeRange(1).Adjustments.Count
End Sub