セルの座標を表示 Excel VBA

Excel VBAではグラフや図を入れる時や移動する時に座標を使う時があります。

下記のコードを使えばセルの位置に合わせたTopとLeftの座標をメッセージボックスで表示できます。

Sub coordinate1()

Dim rng1 As Range
Set rng1 = Range("A1")

MsgBox rng1.Top & vbLf & rng1.Left
End Sub