Adjustments Property Example

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

Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes(3).Adjustments(1) = 0.25