Here's my sample output of split text using textbox and Button in Active X Control. As you can see here "Hello World!" was inputted in the text box and the output was splitted text. 

But what I want is everytime that I input some data on textbox it gives splitted text continuously in other words the cell keeps the historical data that I inputted on the textbox. 

Because it just give splitted text but not keeping it when entering new data on the textbox. I Want this output because I will use all of historical splitted text and count it after counting the most occurrence I will make a descriptive graph for my project

Here's my code:

```
Sub SplitText()
    Dim TextString As String, WArray() As String, Counter As Integer, Strg As String

    TextString = TextBox1
    WArray() = Split(TextString, " ")

    For Counter = LBound(WArray) To UBound(WArray)
        Strg = WArray(Counter)
        Cells(Counter + 2, 1).Value = Trim(Strg)
    Next Counter
End Sub

```

[![sampleoutput1](https://i.stack.imgur.com/rs7Es.jpg)](https://i.stack.imgur.com/rs7Es.jpg)

[![sample output2](https://i.stack.imgur.com/XFjJR.jpg)](https://i.stack.imgur.com/XFjJR.jpg)