EXCEL VBA：データが入力されている最後のセルの位置

EXCEL VBA のメモ

Ra = ActiveCell.Row 'アクティブセルの行の位置
Ca = ActiveCell.Column 'アクティブセルの列の位置

Rc = ActiveSheet.Rows.Count 'アクティブシートの全行数
Cc = ActiveSheet.Columns.Count 'アクティブシートの全列数

Rm = Cells(Rc, Ca).End(xlUp).Row 'Ca列の中で、データが入力されている最も下のセルの行の位置
Cm = Cells(Ra, Cc).End(xlToLeft).Column 'Ra行の中で、データが入力されている最も右のセルの列の位置

---EXCEL関連---
「EXCELのセル関数でA1形式のアルファベットを得る」
「EXCELのセル関数でA1形式のアルファベットをカラム位置を示す数字に変換する。」

EXCELのセル関数でA1形式のアルファベットをカラム位置を示す数字に変換する。

EXCELのセル関数でA1形式のアルファベットをカラム位置を示す数字に変換する方法！

=COLUMN(INDIRECT(B5&"1"))
セルB5に入っているA1形式のアルファベットをカラム数に変換する。

***各関数の動き***

=B5&"1"
セルB5に入っているA1形式のアルファベットの後に文字"1"を結合する。

=INDIRECT(S)
A1形式の文字列=S を セルの参照に変換する。

=COLUMN(C)
セルの参照=C から カラム位置を示す数字を得る。

EXCELのセル関数でA1形式のアルファベットを得る

EXCELのセル関数でA1形式のアルファベットを得る方法！

=SUBSTITUTE(ADDRESS(1,COLUMN(),4),1,)
式が入力されているセルの参照 を A1形式 で取得し アルファベット部分のみ を得る。

***各関数の動き***

=COLUMN()
COLUMN関数が入力されているセルの列番号を返す。

=ADDRESS(1,C,4)
行番号=1 列番号=C のセルの参照を、
A1形式・絶対参照($なし)の文字列で返す。

=SUBSTITUTE(S,1,)
文字列=S の中の "1" を "" に置き換える。