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

関連記事

: 対象のセルが配列数式の一部かどうか（HasArray プロパティ）

HasArray プロパティ HasArray プロパティは、対象のセルが配列数 …

: 直前のセル・直後のセルを参照する（Previous プロパティ・Next プロパティ）

Previous プロパティ・Next プロパティ Previous プロパティ …

: 連続データを入力する（AutoFill メソッド）

AutoFill メソッド Excel で、連続するデータを入力する「オートフィ …

: オートフィルタの状況を確認（AutoFilterMode, FilterMode)

AutoFilterMode プロパティ AutoFilterMode プロパテ …

: 文字列の縦位置を取得・設定する（VerticalAlignment プロパティ）

VerticalAlignment プロパティ VerticalAlignmen …

: 現在選択されているセルを参照（RangeSelection プロパティ）

RangeSelection プロパティ実際に何が選択されているかにかかわらず …

: セルの表示形式を設定・取得する（NumberFormat プロパティ）

NumberFormat プロパティ NumberFormat プロパティは、現 …

: セルを挿入する（Insert メソッド）

Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …

: 指定した条件に一致するセルを取得（SpecialCells メソッド）

SpecialCells メソッド SpecialCells メソッドは、指定し …

: オートフィルタ（抽出件数の取得・結果集計）AutoFilter メソッド

ワークシート関数の Subtotal 関数の使い方 VBA には、オートフィル …

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