参考サイト
・No.8 ワークシートの最終行、最終列を取得する
/*---------------------------------------------------------------------------*/
Dim rowCount As Integer
rowCount = Range("A1").End(xlDown).row
/*---------------------------------------------------------------------------*/
任意のシートの最終行を取得したい場合はそのシートを取得してRange以下を呼んでやる。
0 件のコメント:
コメントを投稿