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

関連記事

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

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

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

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

: 任意のセルを含む行または列全体を参照（EntireRow プロパティ,EntireColumn プロパティ）

EntireRow プロパティ・EntireColumn プロパティ Entir …

: セル・セル範囲に名前を定義・削除（Name プロパティ・Names コレクション）

セル・セル範囲に名前を定義（Name プロパティ） Range オブジェクトのN …

: アクティブなセルを参照する（ActiveCell プロパティ）

ActiveCell プロパティ ActiveCell プロパティは、各ウィンド …

: 網かけ（パターン）の取得・設定（Pattern プロパティ）

網かけ（パターン）を取得・設定するセルの背景に網かけ（パターン）を設定したり、 …

: 任意の行または列を参照（Rows プロパティ,Columns プロパティ）

Rows プロパティ・Columns プロパティ Rows プロパティは、オブジ …

: セルの値を置換・書式設定（Replace メソッド,ReplaceFormat プロパティ）

セルの値の置換と書式設定検索条件に一致するセルの書式を設定するには、まず、Ap …

: セルの値を置換（Replace メソッド）

Replace メソッド任意のセル範囲内から特定の値を一括して置換します。Fi …

: コメントの設定（Comments, Comment, AddComment, ClearComment）

コメントの設定セルにコメントを新規に挿入するには、AddComment メソッ …

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