I should have added that Acrobat Reader (8.0) does open with this code, but
that's all. Otto
"Otto Moehrbach" wrote in message
...
Excel XP & Win XP
I have used the following code (credit to Tom Ogilvy) to open a .pdf file.
It has worked just fine, now it doesn't. I now get an error that the file
cannot be found. The only difference that I am aware of is that I
recently upgraded to Adobe Reader 8.0 from Adobe Reader 7.0.
Question: Does anyone have an insight as to what may be happening?
Thanks for your time. Otto
Sub OpenPdfFile(WhichOne As String)
Dim Filename As String
Dim myShell As Object
Set myShell = CreateObject("WScript.Shell")
Filename = "C:\LettersForms\Ops Manual\" & WhichOne & " Ops
Manual.pdf"
myShell.Run ("AcroRd32.exe " & Filename)
End Sub