ワークシート内で図の移動をVBAで行うには、
図のTopプロパティとWidthプロパティに値を設定します。
Sub ProcPicturePosition()
With Sheet1.Shapes("pict1")
.Top = Rows(5).Top
.Left = Columns(2).Left
End With
End Sub
上記サンプルコードでは
「pict1」のTopプロパティに5行目セルの上位値を
Leftプロパティに2列目(B列)セルの左位置をしています。
上記コードを実行することにより、
「pict1」の左上の角がB5列の左上の角の位置に
移動します。
