Cita:  
					Iniciado por mrocf  
  Primero permíteme sugerirte un cambio a tu macro de modo de "reducir a la mitad" tu código:
 
Código:
 TextBox2 = ActiveCell.Offset(0, 1)
TextBox3 = ActiveCell.Offset(0, 2)
TextBox4 = ActiveCell.Offset(0, 3)
  Y a partir del cambio anterior, se deduce -rápidamente- lo que deseas realizar: 
Código:
 ActiveCell.Offset(0, 1) = TextBox2
ActiveCell.Offset(0, 2) = TextBox3
ActiveCell.Offset(0, 3) = TextBox4
     La idea es:
1º) Tienes un botón de macro que encuentra el registro y lo despliega en los TEXTBOX (primer conjunto de instrucciones); 
2º) Realizas TODOS los cambios que consideres oportuno en TODOS los campos del registro; y 
3º) Mediante OTRO botón de macro, trasladas los valores de los TEXTBOX a las celdas correspondientes mediante el segundo conjunto de instrucciones.