Como se en que numero consecutivo voy en otra hoja

Podrías poner un botón en la 2ª hoja que te muestre un Msgbox con el dato que necesitas, quedaría así la macro para asignar al botón, suponemos que estas en la Hoja2 y tu Hoja1 es de donde extraer la información, suponemos que la col con numero consecutivos es la Col A:
Private Sub CommandButton1_Click()
Dim celda As String
Application.ScreenUpdating = False
Sheets("Hoja1").Select
ActiveSheet.Range("A1").Select
celda = ActiveCell.End(xlDown).Address
Sheets("Hoja2").Select
MsgBox " La última celda con datos es " & celda & ""
End Sub
Espero que te sirva.
>Un saludo
>Julio
PD: Finaliza y puntúa la consulta.

Muchas gracias por tu respuesta.
Creo que ya estoy cerca pero me pasa algo y es que no me muestra la ultima celda sino la primera con datos ¿qué tengo mal?
Muchas gracias.
Gustavo

Listo ya entendí que tenia mal, lo corregí y me sale la celda en un cuadro de mensaje.
Me puedes explicar como hago para que el valor de esta celda, ¿me aparezca en una celda de la segunda hoja?
Muchas gracias.
Gustavo

Pues es fácil ya tienes la variable que recoge el dato pues ponla como valor de la celda que quieras:
Private Sub CommandButton1_Click()
Dim celda As String
Application.ScreenUpdating = False
Sheets("Hoja1").Select
ActiveSheet.Range("A1").Select
celda = ActiveCell.End(xlDown).Address
Sheets("Hoja2").Select
Range("C5").Value=celda ' Aquí pones la celda que quieras
End Sub
>Un saludo
>Julio

Bueno ponme un correo y te lo solicito
>Un saludo
>Julio

Gracias
gusstavo arroba hotmail punto com

Ya te lo he solicitado.

Ya te he enviado el archivo terminado.
Finaliza la consulta. Gracias.
>Un saludo
>Julio