主题：[求助]我这段代码是查找excel中标签的但是执行不进去呀

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:pdf_temp.rar

为何saveToPdf和excle里面保存的内容差别这么大，掉内容

用vba直接保存

 

Dim App As New MSExcel.Application
try
    Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("d:\会议签到表.xls")
    '创建Excel文件对应的PDF文件
    wb.Saved = True
    wb.ExportAsFixedFormat(MSExcel.XlFixedFormatType.xlTypePDF, "d:\会议签到表.pdf", MsExcel.XlFixedFormatQuality.xlQualityStandard, True, False,  System.Reflection.Missing.Value,  System.Reflection.Missing.Value, True,  System.Reflection.Missing.Value)
    app.quit
    msgbox("OK")
catch ex As exception
    msgbox(ex.message)
    app.quit
End try

 

 vba？我这是ft里面的后台程序呀， excel文件根本不现实出来的 直接生成pdf給使用者
上面代码可以在ft里面用吗

 可以 刚试下了  哈哈哈 终于弄完了