この関数について
ExcelVBA（マクロ）による業務の自動化では、シートに入力されているデータを加工することが多いです。台帳や管理表に付属するマクロを考えるとき、ユーザーが行方向にデータを伸ばしていくことが想定されます。そんな時、何行目までデータが埋まっているか最終行を取得するため、セルのEndプロパティを使用して最終行を確認しましょうという記事が多いです。この関数は表に空白のレコードがある場合を想定してExcelの一番下の行からデータが入力されている行に向かってEndプロパティを実施した結果の行番号を返します。
関数コピペ ～コードをクリックするだけでコピー完了！～
使い方 ①引数
| 引数名 | 型 | 参照 | 省略 | 内容 |
|---|---|---|---|---|
| target_ws | WorkSheet | ByVal | 不可 | 最終行を取得したい表が入力されているシート |
| col_index | Long | ByVal | 不可 | 最終行を取得したい列番号 例）C列⇒「3」 |
使い方 ②戻り値
| 状態 | 型 | 内容 |
|---|---|---|
| 正常 | Long | データが入力されている最終行を返します。 |
| 例外 | String | 例外は想定されていません |
| エラー | String | エラー処理は行いません |
サンプルコード（クリックでコピー）
【結果】データが入力された最終行を取得することができました
サンプルコードを実行するとセル「A1」～「A3」に適当なデータを入力した後、A列のデータが入力された最終行を取得し、イミディエイトウィンドウに出力します。
関数リファレンスにはコピペで使用可能な便利関数を多数掲載！
関数リファレンスでは私が開発の中で必要になったコード部品を汎用化・関数化して公開しています。この記事で紹介した関数以外にもコピペで利用できる関数を多数用意しています。検索窓から必要な機能を検索してみましょう！解説記事も続々公開中。
Comment