How to keep adding values from a cell value to a text box

[jvinces]

How can I display on a text box(or whatever is easier honestly) the values from D4, E4 and F4?
I want to keep adding the values of those cells to a text box.
Currently I can display the contents of those cells in a text box, but I want to keep adding more values.
So essentially, if the first set of value is "John's car is red", that will this play in the text box using a command button(code below) but now I want to keep "John's car is red"
in the text box but also be able to add more values like "Matt's bike is yellow" etc etc.
When I keep changing the values of those 3 cells, it also changes on the text box.


Private Sub CommandButton2_Click()

If Me.TextBox1.Visible = True Then
Me.TextBox1.Visible = False
Else
Me.TextBox1.Visible = True
End If

Dim avarTest As String

avarTest = Range("D4").Value & " " & Range("E4").Value & " " & Range("F4").Value & ", "
TextBox1.Value = avarTest

End Sub


Thanks in advanced!

 

[Jeffrey Mahoney]

TextBox1.Value = TextBox1.Value & " " & avarTest

 

[jvinces]

that helped, thanks Jeff