Excel - ingresos de datos (de nuevo)

Intente hacer lo que me habian respondido pero no lo hice bien, tal vez por un error mio. Acá detallo más lo que intentaba hacer y que hice para ver si le encuentran el error cometido. La idea voy a tratar de simplificarla en un caso común.
Creo un formulario con un cuadro de texto y un botón llamado ingresar. en el código del botópn escribi lo siguiente
range("A2").select
selection.end(xldown).select
activecell.offset(1,0).activate
activecell.formular1c1=txt1.text

ah y para hacer la prueba habia escrito en la hoja en una celda cualquiera de la columna "A" cualquier palabra. Al completar el cuadro de texto y dar click en ingresar se excribe el ingreso en la celda de abajo de la ya completada, tal como queria. pero al hacer un nuevo ingreso lo hace en la misma celda todas las veces. Nuevamente gracias.

Que tal si usas algo como lo siquiente:

Range("A65000").End(xlUp).Offset(1, 0).Select
ActiveCell.FormulaR1C1 = "Lo que quieras"

Cordial saludo desde Pereira Colombia