Office 2007 le permite crear archivos PDF fácilmente desde cualquier documento de Word a través del menú de salida en el botón de Office, (Access también lo hace con los informes), pero he tenido que crear un procedimiento recientemente para un cliente que quería convertir documentos de Word a PDF, enviarlos por correo electrónico y hacerlo todo desde Access

Nota: Para hacer este trabajo de código, tendrá que agregar una referencia a Word 2007 en su base de datos Access.
Aquí está el código:
Private Sub CreatePDF(strSourceFile As String, strDestFile As String)
Dim objWord As Word.Application
Dim objWordDoc As Word.Document

On Error GoTo ErrorHandler

Set objWord = CreateObject(“Word.Application”)
objWord.Visible = True
Set objWordDoc = objWord.Documents.
Open(strSourceFile)
If Not objWord Is Nothing Then
objWordDoc.ExportAsFixedFormat strDestFile, wdExportFormatPDF, False, wdExportOptimizeForPrint, wdExportAllDocument
End If

ExitProcedure:
objWordDoc.Close False
objWord.Quit
Set objWordDoc = Nothing
Set objWord = Nothing
Exit Sub

ErrorHandler:
MsgBox Err.Description, vbInformation, “Error Creando PDF”

End Sub

Nótese como puedo mostrar Word al principio del proceso, no hacerlo puede dejar Word «colgado» en la memoria si el código devuelve con un error.