Word VBA userform textbox naar bookmarks krijg gekke dubbeling?

[Remko33]

Goedemiddag allemaal,

Ik ben een offerte sjabloon aan het maken en loopt tegen het volgende probleem aan:

Heb in het word document 2 bookmarks (bladwijzers) aangemaakt als test.
In VBA heb ik een userform1 aangemaakt met 2 textboxen t.w. textbox1 en textbox2
Deze heb ik aan elkaar gekoppeld d.m.v. onderstaande regels:

Private Sub TextBox1_Change()
ActiveDocument.Bookmarks("Naam").Range.Text = TextBox1
End Sub

Private Sub TextBox2_Change()
ActiveDocument.Bookmarks("Woonplaats").Range.Text = TextBox2
End Sub

Ik dacht dat het zo wel zou moeten werken echter is het resultaat voor mij verrassend.
Als ik in textbox1 de tekst invoer "hoe kan dat?" dan staat er "hoe kan dat??hoe kan dat?hoe kan dathoe kan dahoe kan dhoe kan hoe kanhoe kahoe khoe hoehoh"
Idem voor textbox2

Mijn vraag is hoe kan ik dit oplossen?
Gr. Remko

 

[snb]

Gebruik hiervoor documentvariabelen:

Private Sub TextBox1_Change()
  if Textbox1.Text<>"" then ActiveDocument.Variables("Naam") = TextBox1.Text
End Sub

Bij het sluiten van het userform:

Activedocument.fields.update

 

[Remko33]

Gebruik hiervoor documentvariabelen:

Private Sub TextBox1_Change()
  if Textbox1.Text<>"" then ActiveDocument.Variables("Naam") = TextBox1.Text
End Sub

Bij het sluiten van het userform:

Activedocument.fields.update

Super bedankt voor je snelle reactie.
Zal het documentvariabel verhaal ook in een eerdere post staan ga er gelijk mee aan de slag!
Ik laat het nog even weten