Good Day All;
I have the following code running in Access 2003, I use this code to open MS Word 2013 documents; which works well, but is there a way to amend this code; so it would allow me to mail merge certain fields from a form in Access 2003 to Word 2013?
Private Sub Command0_Click()
Dim LWordDoc As String
Dim oApp As Object
'Path to the word document
LWordDoc = "C:\test\MailMerge\Guidance.doc"
If Dir(LWordDoc) = "" Then
MsgBox "Document not found."
Else
'Create an instance of MS Word
Set oApp = CreateObject(Class:="Word.Application")
oApp.Visible = True
'Open the Document
oApp.Documents.Open FileName:=LWordDoc
End If
End Sub
Your help on this would be much appreciated.
Kind Regards
Tor Fey
I have the following code running in Access 2003, I use this code to open MS Word 2013 documents; which works well, but is there a way to amend this code; so it would allow me to mail merge certain fields from a form in Access 2003 to Word 2013?
Private Sub Command0_Click()
Dim LWordDoc As String
Dim oApp As Object
'Path to the word document
LWordDoc = "C:\test\MailMerge\Guidance.doc"
If Dir(LWordDoc) = "" Then
MsgBox "Document not found."
Else
'Create an instance of MS Word
Set oApp = CreateObject(Class:="Word.Application")
oApp.Visible = True
'Open the Document
oApp.Documents.Open FileName:=LWordDoc
End If
End Sub
Your help on this would be much appreciated.
Kind Regards
Tor Fey