excel导出为PDF

普斯学长

excel的指定表怎么导出为pdf文件

奸商

这样那样就好了

fanghong

我来看一看

TIANL

参考csv转excel：https://bbs.125.la/forum.php?mod=viewthread&tid=14803485

.版本 2

.子程序 Excel_xlsx转pdf, 逻辑型
.参数 参_文件路径, 文本型
.局部变量 局_Excel程序, 对象
.局部变量 局_工作簿集对象, 对象
.局部变量 局_工作簿对象, 对象

.如果真 (局_Excel程序.创建 (“excel.application”, ) ＝ 假)
    .如果真 (局_Excel程序.创建 (“ket.application”, ) ＝ 假)
        返回 (假)
    .如果真结束

.如果真结束

局_Excel程序.写属性 (“Visible”, 假)
局_Excel程序.写属性 (“DisplayAlerts”, 假)
局_工作簿集对象 ＝ 局_Excel程序.读对象型属性 (“Workbooks”, )
局_工作簿集对象.方法 (“Open”, 参_文件路径)
局_工作簿对象 ＝ 局_Excel程序.读对象型属性 (“ActiveWorkbook”, )
局_工作簿对象.方法 (“ExportAsFixedFormat”, 0, 目录_取父路径 (参_文件路径) ＋ 文件_取文件名 (参_文件路径, 假) ＋ “.pdf”)

局_工作簿对象.方法 (“Close”, )
局_工作簿对象.清除 ()
局_工作簿集对象.方法 (“Close”, )
局_工作簿对象.清除 ()
局_Excel程序.方法 (“Quit”, )
局_Excel程序.清除 ()
返回 (真)