For Loop Combo Boxes with If Statement

Thanks so much, I have decided to redo the Userform as suggested with a combobox for description, a text box for the amount and then a list box. My listbox is two column I can add one item from the combobox to column 1 and the textboxitem to column 2 , but if I try adding another item it just overwrites, this is my code:

With ListBox1

.AddItem
.Column(0, 0) = ComboBox1.Value
.Column(1, 0) = TextBox1.Value

End With

End Sub

I feel like there should be something to count the rows or go to next row in the ListBox? Where am I going wrong