Thema Datum  Von Nutzer Rating
Antwort
Rot Error 91 ActiveDocument.ExportAsFixedFormat
 17.05.2017 13:02:36 marlemion
NotSolved

Ansicht des Beitrags:
Von:
marlemion		 Datum:
17.05.2017 13:02:36		 Views:
964		 Rating:
     
Antwort:
  Ja
Thema:
Error 91 ActiveDocument.ExportAsFixedFormat

Hi, does anybody have a clue, why I get an error 91 here? I am opening a MSG file in Outlook and would like to save it as a PDF:

The 'wrdApp.ActiveDocument.ExportAsFixedFormat PDFFile, wdExportFormatPDF' part is highlighted by debug:

 

Sub SavePDF()

    'Get all selected items
    Set WindowName = Application.ActiveWindow.CurrentItem
    
    TMPFile = "Z:\mnt\doc-in\office2pdf.mht"
    PDFFile = "Z:\mnt\pdf-out\office2pdf.pdf"
         
    'Save the mht-file
    WindowName.SaveAs TMPFile, olMHTML
    
    'Create a Word object
    Dim wrdApp As Word.Application
    Set wrdApp = CreateObject("Word.Application")
    wrdApp.Visible = True
        
    'Open the mht-file in Word without Word visible
    wrdApp.Documents.Open TMPFile
    
    wrdApp.Activate
    
    wrdApp.ActiveDocument.ExportAsFixedFormat PDFFile, wdExportFormatPDF
  
    ' close the document and Word
    wrdApp.Quit
    
    'Cleanup
    Set TMPFile = Nothing
    Set PDFFile = Nothing
    Set WindowName = Nothing
    Set wrdApp = Nothing
    
End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Error 91 ActiveDocument.ExportAsFixedFormat
 17.05.2017 13:02:36 marlemion
NotSolved