Shapes (Shape)![]() ![]() ![]() |
代表图形的阴影格式。
可用 Shadow 属性返回 ShadowFormat 对象。下例向 myDocument
添加带阴影的矩形。该矩形的阴影是半透明的蓝色阴影,投影方向是右上方,右边的阴影为 5 磅宽,上方的阴影为 3 磅高。
Set myDocument = Worksheets(1)
With myDocument.Shapes.AddShape(msoShapeRectangle, _
50, 50, 100, 200).Shadow
.ForeColor.RGB = RGB(0, 0, 128)
.OffsetX = 5
.OffsetY = -3
.Transparency = 0.5
.Visible = True
End With