Visual Basic - como puedo pararme en el ultimo registro

al abrir un archivo de excel, deseo saber cuantas filas llenas o escritas tengo, es decir el ultimo registro en las celdas, aqui esta el codigo q utilizo para llenar las celdas desde VB:

Set book = GetObject(Path & "\xls.xls")

book.Windows(1).Visible = True
book.Application.Visible = True

n = 1


DoEvents
book.ActiveSheet.Cells(n + 1, 1).Value = ListView1.GetFirstVisible.ListSubItems.Item(1)
book.ActiveSheet.Cells(n + 1, 2).Value = ListView1.GetFirstVisible.ListSubItems.Item(2)
book.ActiveSheet.Cells(n + 1, 3).Value = ListView1.GetFirstVisible.ListSubItems.Item(3)
book.ActiveSheet.Cells(n + 1, 4).Value = ListView1.GetFirstVisible.ListSubItems.Item(4)
book.ActiveSheet.Cells(n + 1, 5).Value = ListView1.GetFirstVisible.ListSubItems.Item(5)

n = n + 1

ListView1.ListItems.Clear
book.Close

Puedes utilizar un bucle Do Until, la sintáxis sería:

Do Until Excel.Cells(Fila, Columna)=""

Loop

Espero te sirva. Saludos Pola