czyzczenie danych po ponownym wprowadzeniu

witam mam Text.Box i Combo Box które są podpięte pod zakładki. Wybieram w nich dane i pojawiają mi się w Wordzie w miejscu gdzie mam zakładki wszystko działa ok do momentu kiedy zmieniam dane w Text.Box i Combo Box dopisuje mi nowe dane do starych a chce żeby je zamieniał. Bardzo proszę o radę jak to zrobić. Poniżej wklejam kod

Private Sub ComboBox1_DropButtonClick()
ComboBox1.List = Array("koń", "ptak", "pies")

End Sub

Private Sub ComboBox2_DropButtonClick()
ComboBox2.List = Array("zielony", "czerwony", "niebieski")
End Sub

Private Sub CommandButton1_Click()
Dim Dane2 As Range
Set Dane2 = ActiveDocument.Bookmarks("Dane2").Range
Dane2.Text = Me.ComboBox1

Dim Dane1 As Range
Set Dane1 = ActiveDocument.Bookmarks("Dane1").Range
Dane1.Text = Me.TextBox1.Value

Me.Repaint
UserForm1.hide

End Sub

Private Sub Label1_Click()

End Sub

Private Sub UserForm_Click()

End Sub