從第x行開始轉到最后使用的行，忽略空格？

Question

當用戶單擊一個單元格時，我想將用戶帶到電子表格中從第5行開始的最后使用的行。

由於某種原因，這不起作用，並產生對象工作表失敗錯誤的方法范圍。

碼：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = Range("AB2").Column Then
        Range("A4" & Rows.Count).End(xlUp).Select
    End If
End Sub

請有人能告訴我我要去哪里錯嗎？

Answer 1

這將跳到最后使用的行，但至少跳到第5行

    If Range("A" & Rows.Count).End(xlUp).Row < 5 Then
        Range("A5").Select
    Else
        Range("A" & Rows.Count).End(xlUp).Select
    End If

Answer 2

工作表的最后一行位於其UsedRange右下角，因此：

[a1].SpecialCells(xlLastCell).Row

將找到最后一行。