Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Westi on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Open a Word document from Access 1
- Thread starter NWTrust
- Start date
-
1
- #3
Hi,
Try this code:
Dim strfilename As String
Dim wrd As Object
Dim wrd1 As Object
strfilename = "path to file"
Set wrd1 = CreateObject("word.application.9")
Set wrd = GetObject(, "Word.Application.9")
wrd.Visible = True
wrd.Documents.Open strfilename, , True
wrd.Activate
or you can open an existing notepad file with this;
Shell ("C:\WINDOWS\NOTEPAD.EXE C:\My Documents\FolderName\FileName.txt")
A fool and his money are soon parted - so you might as well send it to me!
Try this code:
Dim strfilename As String
Dim wrd As Object
Dim wrd1 As Object
strfilename = "path to file"
Set wrd1 = CreateObject("word.application.9")
Set wrd = GetObject(, "Word.Application.9")
wrd.Visible = True
wrd.Documents.Open strfilename, , True
wrd.Activate
or you can open an existing notepad file with this;
Shell ("C:\WINDOWS\NOTEPAD.EXE C:\My Documents\FolderName\FileName.txt")
A fool and his money are soon parted - so you might as well send it to me!
- Status
Similar threads
