Ok...I have a MS Words form. I created a textbox in this form.

The other thing that I have is a popup "UserForm" with a listbox.

When an user select any one value from this listbox, I want that value to populate the "textbox".

Here are my codes:
Private Sub CommandButton1_Click()
ActiveDocument.FormFields("TextBox1").Result = Me.ListBox1.Text
Unload Me
End Sub
WHen I run this, I get an '5941' error message. Please advise what I am doing wrong.

Thank you.
Joe

Hi Joe

Can you try

Private Sub CommandButton1_Click()
ActiveDocument.FormFields("Text1").Result = Me.ListBox1.Text
Unload Me
End Sub

Word Formfields have Text1 instead of TextBox1

Cheers
Shasur

http://www.dotnetdud.blogspot.com

VBA Tips & Tricks (http://www.vbadud.blogspot.com)

i tried with "Text1" but still same error message. Somehow the codes is not applying what I have selected in the listbox into the textbox. Are my codes correct?