VBA セルとセルの範囲のアドレス

このチュートリアルでは、セルのアドレスを取得する方法について説明します。

セルの範囲のアドレスを取得する

Rangeオブジェクトを使って、セルのアドレスを表示します。

MsgBox Range("A1").Address

セルのアドレスを取得する

Cellsオブジェクトを使用して、セルのアドレスを表示します。

MsgBox Cells(1,1).Address

アクティブセルのアドレス

アクティブセルのアドレスを取得するには、次のコードを使います。

MsgBox ActiveCell.Address

変数にセルのアドレスを設定する

また、セルのアドレスを文字列変数に代入しておくと、コード内で簡単に利用することができます。

Dim strAddress As String
strAddress = Range("A1").Address

MsgBox strAddress

セルのアドレスから行番号を取得する

このコードでは、アドレスから行番号を抽出します。

Sub GetRowNumberFromCellAddress()
Dim strAddress As String
Dim rownum As Long

strAddress = Range("A1:a10").Address

rownum = Range(strAddress).Row

MsgBox rownum

End Sub

しかし、通常はもっと簡単なこのようなコードを使うことができます。

MsgBox Range("A1").Row