[word2003] Veld automatisch in laten vullen

[Adelbert]

Hallo,

Ik zou graag een veld automatisch laten vullen aan de hand van de data uit een ander veld.

Met een dropdown heb ik dit als volgt opgelost:

Sub naw()
'1 piet

'
If ActiveDocument.FormFields("naam").DropDown.Value = 1 Then ActiveDocument.FormFields("adres").Result = "Postbus 333"

End Sub

Nu zou ik dit ook graag willen realiseren zonder een dropdown menu. Bijvoorbeeld dus een veld "username" en dat het veld "secondname" automatisch gevuld wordt met iets in de richting van bovenstaande code.

Ik heb al verschillenden mogenlijkheden geprobeerd maar het wil nog niet lukken. Het deel vanaf then klopt volgens mij wel, maar het eerste deel zal iets aangepast moeten worden. Ik zit te denken aan:

If ActiveDocument.FormFields("naam").Value = piet Then

Als iemand mij de goede richting op wil schoppen graag .

Alvast bedankt.

[Adelbert]

Sorry voor het openen van dit topic, hij mag weer dicht. Soms is te moeilijk denken ook een kunst hahaha.

Via de std invoer in word is ook het gewenste resultaat te bereiken ivm username enz.