The following code should so the trick
This will fill textboxes 2 and 3 on exit from textbox1 if they don't already have a value.Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Me.TextBox2.Text = "" Then Me.TextBox2.Text = Me.TextBox1.Text End If If Me.TextBox3.Text = "" Then Me.TextBox3.Text = Me.TextBox1.Text End If End Sub
You may change 2 and 3 without effecting a change elsewhere.