【エクセルVBA】画像に枠線を追加

挿入した画像に枠線を付ける方法

画像を選択した状態で以下のコードを実行でできます。

Sub Border()

　　With Selection.ShapeRange.Line
　　　　.Visible = msoTrue
　　　　.ForeColor.RGB = RGB(150, 150, 150)
　　　　.Weight = 3
　　End With

End Sub

色は.ForeColor.RGBで指定、上のコードでは（150,150,150）でグレーです。

線の太さは.Weightで指定できます。

以下の図は上のコードで枠線を追加した画像です。

枠線追加前後