In diesem Beispiel werden die horizontale und die vertikale Versetzung des Schattens der dritten Form in myDocument festgelegt. Der Schatten wird 5 Punkt nach rechts und 3 Punkt über die Form versetzt. Besitzt die Form noch keinen Schatten, fügt ihr dieses Beispiel einen hinzu.
Set myDocument = Worksheets(1) With myDocument.Shapes(3).Shadow .Visible = True .OffsetX = 5 .OffsetY = -3 End With