| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]ExportAsFixedFormat 另存为PDF 报错：未安装打印机 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87268) |
| -- 作者：黄训良 -- 发布时间：2016/7/7 9:58:00 -- [求助]ExportAsFixedFormat 另存为PDF 报错：未安装打印机 报错：未安装打印机. Dim App As New MSExcel.Application Dim wb As MSExcel.WorkBook = App.WorkBooks.Open(ProjectPath & "123.xls") wb.save \'必须写上这句,不然就会弹出保存对话框 wb.ExportAsFixedFormat(0,ProjectPath & "123.pdf") \'保存为PDF文件 ,第一个参数 0 为PDF类型, 设为1 是XPS类型. wb.close() App.Quit() |
| -- 作者：大红袍 -- 发布时间：2016/7/7 10:02:00 -- 开启打印机服务，或者设置一个默认打印机
http://jingyan.baidu.com/article/48b558e35dfbc47f39c09a71.html |