Adjustments Property Example

This example sets to 0.25 the value of adjustment one on shape one on myDocument.

Set myDocument = Worksheets(1)
myDocument.Shapes(1).Adjustments(1) = 0.25