Cómo lograr el cambio con un solo clic en formularios VBA

Coloca estos códigos en el botón del Formulario 2

Private Sub CommandButton2_Click()

[B14] = TextBox1 'Celda B14 = Cuadro de texto 1

[B15] = TextBox2 'Celda B15 = Cuadro de texto 2

[B16] = TextBox3 'Celda B16 = Cuadro de texto 3

Descargarme ' Descarga el formulario de la memoria

UserForm1.Show 'Visualización del formulario 1

End Sub