Por lo poco que sé de excel, creo que una página puede tener de 1 a 65536 lineas y de 1 a 256 columnas, de modo que, como desconozco el uso avanzado del excel me limitaría a buscar la línea vacía con un bucle:
Código vb:
Ver originalDim F As Long
Dim F2 As Long
For F = 0 To 65535
For F2 = 0 To 255
If ApExcel.cells(F + 1, F2 + 1) <> "" Then Exit For
Next F2
If F2 = 256 Then Exit For
Next F
MsgBox "siguiente linea libre= " & F + 1
Si haces pública la variable ApExcel puedes meter esto fácilmente en una función.
Suerte