VBA 途中に空白のあるデータの最終行を知りたい

↓ここで、連続したデータがある時のデータがある最終行が何行目か、知ることができます。

VBA データがある最終行が何行目か知りたい

でも、途中で空白があると、ダメなんです。

そういう時は！

↓ここで使った　usedrangeっていうのを使います。

VBA 使用したセル範囲を選択する

Sub kazoeyo()

With ActiveSheet.UsedRange
lastRow = .Rows(.Rows.Count).Row
lastCol = .Columns(.Columns.Count).Column
End With

Debug.Print lastRow
Debug.Print lastCol

End Sub

ついでに、最終列までカウントしました。結果は、イミディエイトウィンドウに表示されています。

やっぱり、今は空白なのに、なんかしらデータが入っていたり書式が設定されていたセルまでは数えてしまいますが、ぜひエクセルを立ち上げなおしてやってみてください。