質問: excel VBAでセル範囲取得コード教えて下さい。 列範囲の最終行を取得コードを教えてください A列の最終行の行番号1 Cells(1, Columns.Count).End(xlToLeft).Column A列の最終行の行番号2 Cells(1, Columns.Count).End(xlToLeft).Column.Select A列の最終行の行番号3 Range("I" & Cells(Rows.Count, 1).End(xlUp)).Select ?225行飛ぶ Range("I2" & Cells(Rows.Count, 1).End(xlUp).Row).Select
回答: 「列範囲の最終行」というのを、どんな意味で使われているのかよく解かりません。 > ?225行飛ぶ > Range("I2" & Cells(Rows.Count, 1).End(xlUp).Row).Select ↑これは A列に25行目までデータが入っている場合、下記のような意味になるので、I225 を選択します。 Range("I2" & 25).Select → Range("I225").Select 1行目にタイトルがある表で、一番右の列の一番下を選択したいって事ですか? Sub Test1() With ActiveSheet .Cells(.Rows.Count, .Cells(1, .Columns.Count).End(xlToLeft).Column).End(xlUp).Select End With End Sub