Untested:


Global objWd as Object, mydoc as Object

Var1 = [B1]
Var2=[B2]

On Error Resume Next
Set ObjWd = GetObject(, "Word.Application")
If Not TypeName(ObjWd) = "Nothing" Then
' ' Word Running
Else
' Word Not Running
NotRunning:
Set ObjWd = CreateObject("Word.Application")
End If
Debug.Print TypeName(ObjWd)
ObjWd.Visible = True
ObjWd.Activate
On Error GoTo 0
Set myDoc = ObjWd.Documents.Open(Blah Blah Blah)

with mydoc
.Selection.GoTo what:=wdGoToBookmark, Name:="your 1st bookmark
name"
.Selection.typetext text:=Var1
'repeat above 2 lines for Var2
end with



--
Hope this gets you started.
Roger
Shaftesbury (UK)







"Robby Saputra" wrote in message
...
Hi All,

I need help in writing this macro in Excel.
I have a worksheet that asks user to input certain values.
For example
Name:
Address:
The values is kept in B1 and B2

I need to pass this value to a Word Document.
Note that the Word Document is already bookmarked. so It
should be going to the 'spot'

Any suggestion?

Thanks
Robby