VBA에서 최종 행 얻기

범위 지정이나 입력 셀의 지정에는, 대상의 열의 최종행 번호를 취득해 사용합니다.

마지막 행 얻기

Sub 最終行を取得()
    Dim LastRow As Long
    LastRow = ThisWorkbook.Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Row
    Debug.Print LastRow
End Sub

마지막 줄 중 하나 아래에서 입력하고 싶다면

Sub 最終行を取得してひとつ下に値を入力()
    Dim LastRow As Long
    LastRow = ThisWorkbook.Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Row
    ThisWorkbook.Worksheets("Sheet1").Cells(LastRow + 1, 1).Value = 10
    ThisWorkbook.Worksheets("Sheet1").Cells(LastRow + 1, 2).Value = "jjj"
End Sub

와타시 흐름 조건

ThisWorkbook.Worksheets ( "Sheet1")과 시트 객체 이름은 절대 붙입니다