本文由日文译成中文。
这是使用 Excel VBA 更改工作表中图像或形状(自动形状)阴影颜色的记录。
ForeColor “属性用于阴影颜色,”RGB “或 ”SchemeColor “属性用于指定颜色。
< Sponsored Links >
更改图像或形状阴影颜色的示例(自动成型)
RGB
用 RGB 更改颜色。
Sub test()
Dim shp As Shape
Set shp = ActiveSheet.Shapes(1)
With shp.Shadow
.Type = msoShadow43
.ForeColor.RGB = RGB(0, 255, 0)
End With
End Sub

SchemeColor
SchemeColor 更改颜色。
Sub test()
Dim shp As Shape
Set shp = ActiveSheet.Shapes(1)
With shp.Shadow
.Type = msoShadow43
.ForeColor.SchemeColor = 15
End With
End Sub

< Sponsored Links >
