Excel - como iniciar al final de la linea

Buenas noches,

Agradezco el espacio y la posibilidad de resolver un problema que se ha vuelto añejo para mi; no soy programador pero me he adentrado a la programación en excel y en vba. Tengo un formulario el cual he buscado la expresión para que lo que se capture en cualquier textBox se capture en la primer fila en blanco al final de las filas con información capturada en la hoja de excel. Lo que sucede al escribir información en el textBox se pasa en la hoja de excel en la última fila con datos, sustituyendo la iniformación

Espero poder encontrar respuesta en este foro

Rafa López

En un form pon un boton y nombralo nuevo y otro Guardar

Private Sub NUEVO_Click()
Sheets("Hoja1").Select
Range("A3").Select ' Row inicial
Rem limpia todos los TextBox
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
While ActiveCell <> "" ' Busca Row en blanco
ActiveCell.Offset(1, 0).Select
Wend
ActivarControles
DesactivarBotones
GUARDAR.Enabled = True
CANCELAR.Enabled = True
TextBox1.SetFocus
End Sub

Private Sub NUEVO_Click()
AsignaDatos
End Sub

Private Sub AsignaDatos()
Rem posiciona el dato en la celda
ActiveCell = TextBox1
Rem se mueve una columna a la derecha
ActiveCell.Offset(0, 1).Select
Rem posiciona el dato en la celda
ActiveCell = TextBox2
Rem se mueve una columna a la derecha
ActiveCell.Offset(0, 1).Select
Rem posiciona el dato en la celda
ActiveCell = TextBox3
End Sub