サイトについて      連絡先   検索

VBA 列番号を取得する

はじめに

Excel VBA の列番号を取得する方法を紹介します。

Range.Column プロパティから列番号を取得できます。

列番号を取得する

Range の引数にセル名を指定すると、そのセルの列番号を取得できます。

セル「A1」の列番号を取得するには Range("A1").Column のように指定します。

Dim l As Long
l = Range("A1").Column ' 1
l = Range("C1").Column ' 3
Debug.Print(l)

アクティブなセルの列番号を取得するには ActiveCell を使用します。

Dim l As Long
l = ActiveCell.Column
Debug.Print(l)

選択されているセルの列番号を取得するには Selection を使用します。

範囲選択されているときは一番左の列番号を取得します。

Dim l As Long
l = Selection.Column
Debug.Print(l)

セルの範囲の列番号を取得する

セルの範囲「B2」~「D4」の列番号を取得するには Range("B2:D4").Column のように指定します。

取得される列番号は範囲の一番左の列番号になります。

Dim l As Long
l = Range("B2:D4").Column ' 2
Debug.Print(l)

列番号から列名を取得する

VBA の関数には列番号から列名を取得する方法はありません。

関連ページ