Hi
I'm transfering a record from Access to Word with this code:
Set objword = New Word.Application
Do Until rst.EOF
With objword
.Visible = True
.Documents.Add Template:=("\\Server\a.dot")
.Selection.GoTo Name:=("CustName")
.Selection.TypeText Text:=rst![CUST_NAME]
.Selection.GoTo Name:=("OpenDate")
.Selection.TypeText Text:=rst![OpenDate]
.....
End With
Loop
How do i transfer more then one recode.
for instance: an order with lines
TIA
I'm transfering a record from Access to Word with this code:
Set objword = New Word.Application
Do Until rst.EOF
With objword
.Visible = True
.Documents.Add Template:=("\\Server\a.dot")
.Selection.GoTo Name:=("CustName")
.Selection.TypeText Text:=rst![CUST_NAME]
.Selection.GoTo Name:=("OpenDate")
.Selection.TypeText Text:=rst![OpenDate]
.....
End With
Loop
How do i transfer more then one recode.
for instance: an order with lines
TIA