hola de nuevo, creo que ya lo he pillado, era más facil de lo que parecía... tan solo así...
en el evento del clic del boton
Range("A1").Select
ActiveCell.FormulaR1C1 = DNI
Range("B1").Select
ActiveCell.FormulaR1C1 = APELLIDO1
Range("C1").Select
ActiveCell.FormulaR1C1 = APELLIDO2
Range("D1").Select
ActiveCell.FormulaR1C1 = NOMBRE
decir que aún no lo he probado con el proyecto, pues lo tengo en el pc del trabajo y hasta el lunes no lo voy a poder trastear como es debido, pero las pruebas iniciales en casa me va bien....
ya me dices que te parece...
en fin, seguimos para adelante
un saludete