【Excel】VBAで途中の空白行は無視し、最終行を取得する

VB

値の入っている列の最終行までloopで全件参照。
しかし所々に空白行があるので、値の入っている最終行を取得する事に・・・

取得手順

方法として、最後の行(下)から上に値を入っている場所を探して行数を求める。
(以下数字の1は列指定で、B列であれば2になる)

Cells(Rows.Count, 1).End(xlUp).Row

この結果を最大行とし、For~Nextでこの結果の値まで回せば良いでしょう。

まとめ

使用する頻度は少ないとは思いますが、今回のような残しておけば後々使うかな?っていう事もあるので備忘録として残しておきます。

————————————————————
日々のITエンジニアの日常作業を発信しています。
また、様々な商品のレビュー記事も投稿していますのでぜひご活用ください。

投稿は基本的に毎週月曜日です。
2025年2月中旬より入院の為投稿できていませんが、2025年6月23日にようやくリスタートできました。

しかし!
現在記事公開ができないトラブルに遭遇しています。
対応中ですので、しばらくお待ちください・・・

今週も頑張っていきます!

VBソフトウェアソフトウェア全般プログラミングプログラミング全般

コメント