エクセルで図形の位置を知るには

オブジェクトの捉え方（記述のし方）さえ判れば、ＴＯＰ 等はプロパティですから 「ｘ＝○○．ＴＯＰ」「ｘ＝○○．ＬＥＦＴ」「ｘ＝○○．ＷＩＤＴＨ」「ｘ＝○○．ＨＥＩＧＨＴ」で捉えられます。ただ４つあるかどうかは調べる必要あり。 例 Sub test02() MsgBox Cells(2, 1).Top MsgBox Cells(3, 2).Left MsgBox Worksheets("sheet1").CommandButton1.Top End Sub

ボタンをつくって、以下のマクロを実行してみてください。 Private Type wSize Name As String Top As Long Left As Long Width As Long End Type Private Sub CommandButton1_Click() Dim wShape As Object Dim wSize() As wSize Dim wShapeCnt As Long For Each wShape In ActiveSheet.Shapes If wShape.Type = msoAutoShape or wShape.Type = msoLine Then ReDim Preserve wSize(wShapeCnt) wSize(wShapeCnt).Name = wShape.Name wSize(wShapeCnt).Top = wShape.Top wSize(wShapeCnt).Left = wShape.Left wSize(wShapeCnt).Width = wShape.Width wShapeCnt = wShapeCnt + 1 End If Next End Sub

可能です。図形を選択して [ツール]＞[マクロ]＞[VisualBasicEditor] を開きます。 VisualBasicEditorのメニューから [表示]＞[イミディエイトウインドウ] として、イミディエイトウインドウ内に、 ?Selection.ShapeRange.top と入力して enterキー ?Selection.ShapeRange.left と入力して enterキー を押せば、その下に選択されている図形のtopとleft値が表示されます。