Home All Groups Group Topic Archive Search About

print .doc by distiller ?

Author
23 May 2005 12:56 PM
Pu
hi,
how can I print a word doc by adobe distiller (pdf), not a normal printer...
have a nice day everybody

Author
23 May 2005 1:24 PM
Tom Winter
This might get you started:

Add a reference to Adobe Acrobat #.# Type Library

Public Sub PrintPDF(sFileSpec As String)

        Dim oAcroDocument As Acrobat.CAcroAVDoc

        Set oAcroDocument = CreateObject("AcroExch.AVDoc")

        oAcroDocument.Open sFileSpec, sFileSpec

        DoEvents

        oAcroDocument.PrintPages 0, oAcroDocument.GetPDDoc.GetNumPages - 1,
1, True, True

        DoEvents

        oAcroDocument.Close True

        DoEvents

End Sub


--
Tom Winter
tom@nospam.amosfivesix.com


Show quoteHide quote
"Pu" <poink@poink> wrote in message
news:uU5agb5XFHA.2996@TK2MSFTNGP10.phx.gbl...
> hi,
> how can I print a word doc by adobe distiller (pdf), not a normal
> printer...
> have a nice day everybody
>
>