Excel value onto word userform
I am not the person to ask and this is not the newsgroup for Word programming help.
However, maybe I won't do any damage...
A textbox (Word or Excel) does not have a "Result" property.
Also, you need to specify the Application | Document | Userform | Textbox that
gets the cell value. So it should look something like...
MyDoc.UserForm1.txtAdd1.Value = ThisWorkbook.ActiveSheet.Range("C8").Value
--
Jim Cone
Portland, Oregon USA
"Al@n"
wrote in message
Hi
I'm trying to import an excel cell value into a textbox on a word userform.
I've managed(with the help of code found in the forums to open a document
based on a word template and get the word userform to display but
cannot get the cell value to populate the textbox on the word userform.
Example code below(Office 2003)
Private Sub cmdQuote_Click()
Dim WD As Object
Dim MyDoc As Object
Set WD = CreateObject("Word.Application")
With WD
Set MyDoc = .Documents.Add(Template:= _
"C:\Documents and Settings\Owner\Desktop\Gas Quotation.dot", _
NewTemplate:=False, DocumentType:=0)
MyDoc.Activate
MyDoc.UserForm("txtAdd1").Result = ActiveSheet.Range("C8").Value
'**********
..Visible = True
End With
End Sub
TIA
--
Al@n
|