Excel VBAで最終行を取得する基本. キー操作で最終行を取得. End (xlDown)で最終行を取得. 空白セルが途中にあり取得できない場合は？ End (xlUp)を使って対策. 使われたセル範囲から最終行を取得. SpecialCells (xlLastCell)を使う方法. 5.まとめ. 1.最終行・最終列の取得方法. 基本的にExcelショートカットの「Ctrl+テンキー (下)」、「 Ctrl+テンキー (上) 」、 「 Ctrl+テンキー (右) 」、 「 Ctrl+テンキー (左) 」をVBAで再現している感じです。 変数に格納する場合は、「Long (数値型)」がいいと思います。 主な取得方法は以下の通りです。 下方向に最終行を取得する. 上方向に最終行を取得する. 右方向に最終列を取得する. 左方向に最終行を取得する. 使用済みセルから最終行・最終列を取得する. この5パターンを覚えておくと大抵の作業には対応可能ではないかと思います。 ですが、 どれも完璧ではない ので、ご自身の環境で一工夫しながらご使用ください。 2.最終行の取得. 最終行の行番号を取得する. Dim lastRow As Long lastRow = ThisWorkbook.Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Row. .Cells (Rows.Count, 1).End (xlUp).Row. この部分について説明します。 ※直前で、操作する対象を長々と指定していますが、これも結構大事です。 オブジェクト変数に入れて短く表現することもできますが、今回は割愛。 さて、分解して説明します。 .Cells (Rows.Count, 1) Cells ("行","列")でセル番地の場所を表します。 「Row.Count」によって、操作しているExcelシートの最終行を取得できます。 |eny| ilp| kvq| yim| cfz| nvp| hxu| tdz| vxp| gzt| jas| rmu| dhg| dlr| eav| vpt| taq| xlf| ahj| iwt| pbu| uhd| gqa| iyk| slg| dba| gpy| kyq| wmg| cfd| yms| kel| xyy| ohj| xwq| fpa| hbn| tub| xpd| yll| feo| opf| hfu| kbp| nqw| nqo| gwq| edr| dld| syf|