Excel VBA シート上の画像や図形の影の色を変える-Shadow.ForeColor

Excel VBAでシート上にある画像や図形の影の色を変更する記録です。

影の色は「ForeColor」プロパティを使い、色の指定は「RGB」プロパティまたは「SchemeColor」プロパティを使います。

下図は、Excel2016です。

< スポンサーリンク >

例

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で色を変えてみます。

Sub test()
    Dim shp As Shape
    Set shp = ActiveSheet.Shapes(1)

    With shp.Shadow
        .Type = msoShadow43
        .ForeColor.SchemeColor = 15
    End With
End Sub

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします