図形に赤枠をつける
指定の場所 例;C1に画像を挿入し、
挿入した画像を縦横比固定120パーセント、
枠を赤に太さを2.25でつけるマクロを書きたいのですがどうしても上手くいきません
赤枠と太さはどのように記述したらよろしのでしょうか?
Sub 図形リサイズ縦横比固定120パーセント()
With Selection.ShapeRange
.LockAspectRatio = msoTrue '縦横比固定
.Width = .Width * 1.2 '120%に図形サイズ変更
End With
ActiveSheet.Shapes
With Selection.ShapeRange.Line
.ForeColor.RGB = RGB(255, 0, 0) '赤枠に
.Weight = 2.25 '線の太さを2.25に
End With
End Sub
補足
なるほど!意味がわかりました!