Botón editar en un formulario de excel

Que tal amigos, buenos días.

tengo un UF con varias funciones, nuevo registro, consulta y modificación de registro. El ingreso de datos se hace si problema alguno, en la búsqueda he sustituido el textbox de ingreso por un combobox el cual se carga y me aparecen todos los datos de ese registro, sobre estos datos que aparecen en la búsqueda, quiero poder modificar el registro en cuestión para lo cual dispongo de una etiqueta que hace las veces de botón de edición. Una vez editado el registro, no me realiza la modificación, o si me lo hace lo hace parcialmente o agregando en otra fila un dato. Ya no se donde tengo el problema. Os dejo el código de la etiqueta editar por si pudierais ayudarme. Muchas gracias.

Private Sub LabelVALIDAREDICION_Click()
Application.ScreenUpdating = False
Sheets("DATOS").Activate
Cells(ComboBox1.ListIndex + 2, 1).Select
ActiveCell.Offset(0, 2) = TextBox2
ActiveCell.Offset(0, 3) = TextBox3
ActiveCell.Offset(0, 4) = TextBox4
ActiveCell.Offset(0, 5) = TextBox5
ActiveCell.Offset(0, 6) = TextBox6
ActiveCell.Offset(0, 7) = TextBox7
ActiveCell.Offset(0, 8) = TextBox8
ActiveCell.Offset(0, 9) = TextBox9
ActiveCell.Offset(0, 10) = TextBox10
ActiveCell.Offset(0, 11) = TextBox11
ActiveCell.Offset(0, 12) = TextBox12
ActiveCell.Offset(0, 13) = TextBox13
ActiveCell.Offset(0, 14) = TextBox14
ActiveCell.Offset(0, 15) = TextBox15
Range("A3").Copy
ComboBox1 = ""
TextBox2 = ""
TextBox3 = ""
TextBox4 = ""
TextBox5 = ""
TextBox6 = ""
TextBox7 = ""
TextBox8 = ""
TextBox9 = ""
TextBox10 = ""
TextBox11 = ""
TextBox12 = ""
TextBox13 = ""
TextBox14 = ""
TextBox15 = ""
End Sub