Private Sub TextBox1_Change()
Sheets("19recto (2)").Cells(Range("B65535").End(xlUp).Row + 1, 2) = UserForm4.TextBox1
End Sub
Private Sub TextBox10_Change()
Sheets("19recto (2)").Cells(Range("N65535").End(xlUp).Row + 1, 14) = UserForm4.TextBox10
End Sub
Private Sub TextBox11_Change()
Sheets("19recto (2)").Cells(Range("O65535").End(xlUp).Row + 1, 15) = UserForm4.TextBox11
End Sub