Dave,
Thanks that was driving me crazy

Now how can I get it to print multiple pdf's, tried looping it but only one
prints
--
Helping Is always a good thing


"Dave Peterson" wrote:

Tom had a space between acrord32.exe and the file name. You'll want one, too.

Shell "C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe " & _
Path_PDF & "\" & Prn_File & ", 1"



QuietMan wrote:

Tom,

I'm receiving a file not found error, even though I know the pathe is correct
is it because the file is located on a share network drive?

here is the code i have

Sub Tester2a()
Path_PDF = Range("Access_Path")
Prn_File = Range("Access_File")
Shell "C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe" & Path_PDF &
"\" & Prn_File & ", 1"
' the following prints the document
Application.SendKeys "^p~", False
End Sub
--
Helping Is always a good thing

"Tom Ogilvy" wrote:

Here is one approach:

Sub Tester2a()
Shell "C:\Program Files\Adobe\Acrobat 5.0\Reader\AcroRd32.exe" & _
" c:\toc1\amcr37-4.pdf", 1
' the following prints the document
Application.SendKeys "^p~", False
End Sub


or if you have .pdf associated with acrobat reader:


Private Sub CommandButton1_Click()
Shell "Start.exe ""D:\My Documents\sm569_Jan2001\tute6.pdf"""
Application.SendKeys "^p~", False
End Sub




--

Regards,

Tom Ogilvy



"QuietMan" wrote in message
...
does anyone know how to print an adobe file using an excel macro?
--
Helping Is always a good thing




--

Dave Peterson