エクセルのセルの座標の取得

エクセルであるセルの左上の座標と右下の座標の取得方法ってご存知のかたいらっしゃいませんか？
宜しくお願いいたします。

No.2 ベストアンサー 回答者： bonaron 回答日時： 2006/10/28 13:11

With ActiveCell

　　Debug.Print .Left '左上 X
　　Debug.Print .Top '左上 Y
　　Debug.Print .Left + .Width '右下 X
　　Debug.Print .Top + .Height '右下 Y
End With

というようなことでしょうか？

この回答へのお礼

ありがとうございます。
手元の資料だと、ウィンドーの表示位置の欄と、図形の欄に載っていましたが、オブジェクトをセルにするだけでいいのですね？
ありがとうございました。

お礼日時：2006/10/28 15:16

No.3 回答者： Yosha 回答日時： 2006/10/28 14:34

>座標

座標には、２種類あります。セル単位での座標とポイント単位の座標です。

ポイント単位での座標の取得方法は、(With ・・・ End Withを使って表示します)

取得したいセルを１つ選択して、次のコードを実行。

With ActiveCell または With Selection
左上のＸ座標 = .Left
左上のＹ座標 = .Top
右下のＸ座標 = .Offset(1,1).Left
右下のＹ座標 = .Offset(1,1).Top
End With

この回答へのお礼

ありがとうございます。
総括してまとめていただき。
２名にしか点数の配分が出来ないため、今回はご了承ください。
また、宜しくお願いいたします。

お礼日時：2006/10/28 15:19

No.1 回答者： merlionXX 回答日時： 2006/10/28 11:55

質問者さんのお名前がExcel_VBAですので、VBAでのことですね？

Sub test01()
MsgBox "左上は" & ActiveCell.Offset(-1, -1).Address & _
vbLf & "右下は" & ActiveCell.Offset(1, 1).Address
End Sub

この回答へのお礼

質問の仕方が悪くて申し訳ありませんでした。
セルのアドレスではありませんでした。
これに懲りずにまた、宜しくお願いいたします。

お礼日時：2006/10/28 15:17