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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: セルが結合セルの一部である場合、その結合セルの範囲を取得（MergeArea プロパティ）

MergeArea プロパティ MergeArea プロパティは、指定したセルが …

: ワイルドカードを使って検索（Find メソッド）

Find メソッド指定したセル範囲内の特定の情報を含むセルを検索します。【書 …

: セル範囲を結合・結合を解除（Merge メソッド・UnMerge メソッド）

Merge メソッド・UnMerge メソッドセルを結合するには、指定したセル …

: セルをアクティブにする・セルを選択する（Activate, Select）

セルをアクティブにする・選択する【書式：セルをアクティブにする】 object …

: フリガナ（Phonetic プロパティ）

Phonetic プロパティ文字列（漢字など）をキーボードから入力した時の「読 …

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

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

: セル範囲を結合・結合を解除（MergeCells プロパティ）

MergeCells プロパティ MergeCells プロパティは、指定したセ …

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

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

: 対象のセルが直接参照しているセル全てを取得（DirectPrecedents プロパティ）

DirectPrecedents プロパティ DirectPrecedents …

: 対象のセルを参照している全てのセルを取得（Dependents プロパティ）

Dependents プロパティ Dependents プロパティは、対象のセル …

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