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

色の各指定表

カラー組込定数RGB指定
vbBlackRGB(0,0,0)
vbWhiteRGB(255,255,255)
vbRedRGB(255,0,0)
vbGreenRGB(0,255,0)
vbBlueRGB(0,0,255)
vbYellowRGB(255,255,0)
vbMagentaRGB(255,0,255)
vbCyanRGB(0,255,255)

コメント

タイトルとURLをコピーしました