Excel VBA 図形(オートシェイプ)の枠線の色を変更する方法

図形の枠線の色を変更する方法

図形の枠線の色を変更するには、LineFormatオブジェクトを設定に使用します。「LineFormat」を取得するためには、「Shapes」オブジェクトの「Line」プロパティを使用します。

図形の枠線の色を変更するサンプルコード

RGB指定で色を変更

Sub setLineColor()
    ActiveSheet.Shapes.AddShape(msoShapeRectangle, 10, 30, 100, 100) _
        .Line _
        .ForeColor.RGB = RGB(0, 0, 0)
End Sub

組込定数で色を変更

Sub setLineColor()
    ActiveSheet.Shapes.AddShape(msoShapeRectangle, 10, 30, 100, 100) _
        .Line _
        .ForeColor.RGB = vbYellow
End Sub

色の各指定表