VBA 値のある最終行を取得する

• 作成日 2022.05.30
• vba
• vba

VBAで、値のある最終行を取得するコードを記述してます。

目次

• 1. 環境
• 2. 値のある最終行を取得

環境

• OS windows10 64bit

値のある最終行を取得

全シート名を取得するには、「End(xlDown)」を使用します。

適当なボタンを用意して、以下のソースコードを記述します。

Private Sub CommandButton1_Click()

　　　　' 結果を表示 
　　　　Cells(1, 2).Value = Range("A1").End(xlDown).Row
    
End Sub

実行してみます。

最終行である「17」が取得されていることが確認できます。

• 前の記事
  

  jquery 指定したhtmlタグの中にhtmlタグを挿入する 2022.05.30

• 次の記事
  

  javascript 配列から重複を除く処理で「set」と「filter」のパフォーマンスを計測する 2022.05.30