Convertir fichero word en pdf con visual basic 6.0

[Manuel_Arce]

hola amigos hace algun tiempo un miembro de este foro, publico este codigo que segun ella funciona pero otro miembro de este foro no lo pudo probar ya que le faltaba una referncia de visual basic 6.0 pregunto el donde la podia encontrar que incluso descargo Adobe Distiller pero tampoco podia ejecutarlo.
y una de las respuesta fue esta.....

en el editor de vb debes ir a herramientas, referencias, y marcar adobe distiller
y listo
pero la respuesta del usuario en problema fue la siguente:
hola compis, he intentado buscar la referencia de destiller pero no la encuentro y he descargado el adobe destiller pero tampoco, alguien me puede ayudar
gracias
salu2

bueno yo tambien la e buscado y no e podido encontrarla le mande correos privados a todos lo que participaron en la solucion a este problema pero Amelia la creadora del codigo (creo) entro por unica vez y confio que las otras personas puedan ayudarme..
el convertir un fichero de word a Pdf tiene que ser solo por Visual basic 6.0.

el codigo que envio Amelia es el siguente:
Private Sub cmbConvertWordToPdf_Click()
Dim Origen As String
Dim Destino As String

Origen = "c:\Ejemplo.ps"
Destino = "c:\Ejemplo.pdf"

Dim objWord As New Word.Application

objWord.Documents.Open "C:\Documento.doc"

objWord.Options.BackgroundOpen = False
objWord.ActivePrinter = "Adobe pdf"
objWord.PrintOut , , , Origen, , , , , , , True

Dim acrobat As PdfDistiller
Set acrobat = New PdfDistiller
acrobat.FileToPDF Origen, Destino, ""

objWord.Quit False

Exit Sub
End Sub

pero para que el codigo funcione pide la referencia adobe distiller

Ojala alguien pueda ayudarme de antemano Gracias

AT:
Manuel Arce