ShapeRange.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 ShapeRange 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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.