ShadowFormat Object (Publisher)

Represents shadow formatting for a shape.

Use the Shadow property to return a ShadowFormat object. The following example adds a shadowed rectangle to the active document. The pink shadow is offset 7 points to the right of the rectangle and 7 points above it.

Sub FormatShadow() 
 With ActiveDocument.Pages(1).Shapes.AddShape( _ 
 Type:=msoShapeRectangle, Left:=72, Top:=72, _ 
 Width:=100, Height:=200).Shadow 
 .ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=150) 
 .Obscured = msoTrue 
 .OffsetX = 7 
 .OffsetY = -7 
 .Visible = True 
 End With 
End Sub

Community Additions

ADD
Show:
© 2014 Microsoft