已引用 office 15.0 ,exportasfiedformat语局是从WORD VBA中录制的,但是在VB6中无法使用。求助!!!!!
Dim appword, wordbook As Object
Set appword = CreateObject("word.application")
Set wordbook = appword.Documents.Open("C:\Users\Desktop\新建 Microsoft Word 文档.docx")
wordbook.ExportAsFixedFormat OutputFileName:="C:\Users\Desktop\新建 Microsoft Word 文档.pdf", _ ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:=wdExportOptimizeForPrint, _ Range:=wdExportAllDocument, From:=1, To:=1, Item:=wdExportDocumentContent, IncludeDocProps:=True, _ KeepIRM:=True, CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, BitmapMissingFonts:=True, _ UseISO19005_1:=False