Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

列名を取得、列番号を取得（Address プロパティ,Column プロパティ）

2015/08/31

列番号を取得する

セル番地（「A1」や「B3」）や列名（「A」「B」「C」… ）から列番号を取得するするには、Column プロパティ を利用します。

【書式】

columnnumber = object.Column

引数・戻り値

object ・・・対象となる Range オブジェクトを指定します。セル範囲を指定した場合、左上端のセルを参照します。
columnnumber ・・・列の番号を表す長整数型（Long）の値。

Column プロパティ に関しては、セルの行番号または列番号を取得を参照してください。

列名を取得する

列番号から列名を取得する関数やプロパティはありませんが、Address プロパティ と Split 関数 を組み合わせて利用すると取得することができます。

【書式】

columnname = Split ( Cells( [ rownumber ], columnnumber ).Address, “$” )(1)

引数・戻り値

rownumber ・・・行の番号を表す長整数型（Long）の値を指定します。（省略可）
columnnumber ・・・列の番号を表す長整数型（Long）の値を指定します。
columnname ・・・列名を表す文字列型（String）の値。

Address プロパティ に関しては、セルのアドレスを確認（Address プロパティ）を参照してください。

Split 関数 に関しては、Split 関数（文字列型の一次配列を作成）を参照してください。

列名を取得、列番号を取得使用例

サンプルVBAソース

　
Sub Sample_GetColumn()


    Dim str As String
    
    
    '「AAA 列」の列番号を取得
    str = "「AAA 列」：" & Range("AAA:AAA").Column & Chr(13)
    
    
    '「50列目」の列名を取得
    str = str & "「50列目」：" & Split(Cells(, 50).Address, "$")(1)
    

    MsgBox str


End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

　

Sub Sample_GetColumn()

Dim str As String

'「AAA 列」の列番号を取得

str = "「AAA 列」：" & Range("AAA:AAA").Column & Chr(13)

'「50列目」の列名を取得

str = str & "「50列目」：" & Split(Cells(, 50).Address, "$")(1)

MsgBox str

End Sub

　

実行結果

- セルの操作 Address プロパティ, Column プロパティ, Range オブジェクト, Split プロパティ, VBA基本, エクセルVBA, セルの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: オートフィルタ（平均より上・平均より下）AutoFilter メソッド

平均値よりも大きい（小さい）値のレコードを抽出 AutoFilter メソッドで …

: 文字列の一部の書式を変更（Characters プロパティ）

文字列の一部を参照（Characters プロパティ） Characters プ …

: 文字列をセル幅で折り返す（WrapText プロパティ）

WrapText プロパティ WrapText プロパティは、セルに表示されてい …

: 非連続のセルが選択されているか確認する（Areas コレクション）

Areas コレクションの使い方複数の離れた位置にあるセル範囲を選択した場合 …

: 行・列の表示・非表示（Hidden プロパティ）

Hidden プロパティ Hidden プロパティに True を設定することで …

: セルの幅・高さの自動調整（AutoFit メソッド）

AutoFit メソッド AutoFit メソッドは、指定したセル・セル範囲（R …

: オートフィルタ（AutoFilter メソッド）

AutoFilter メソッド【書式】 object.AutoFilter ( …

: VBA で、ワークシート関数を使用（WorksheetFunction プロパティ）

VBA で、ワークシと関数を使用 VBA から、ワークシート関数を呼び出す場合、 …

: 別シートのセルを選択（Goto メソッド／ PreviousSelections プロパティ）

Goto メソッド次の例のように、1 行で、Activate メソッドや S …

: セル・セル範囲を切り取る（Cut メソッド）

Cut メソッド Cut メソッドは、指定したセル範囲を切り取り、引数に指定した …

PREV: 画面の更新を停止（ScreenUpdating プロパティ）
NEXT: 文字列：定数（改行・タブ）