怎样批量将EXCEL转换成PDF并以当前文件名保存

threedian141 · 发表于 2010-12-1 09:35

这两天年轻人刚上班，就接到了这么一个活。有巨量的EXCEL表格，要转换成PDF形式，并合并成一份PDF文件。

我是新手，就用EXCEL另存为PDF的功能一个一个的转换成PDF。后来录制了一个简单的宏，将每个EXCEL文件中的操作设置了一个快捷键。但是问题出在了，所有的文件都以我录制宏时的那一个文件名保存了。等于不断的覆盖那个文件名。

我看了看代码问题在这里，我不知道怎么改这一句才好，才能要求以原EXCEL文件名储存（动态的喽），而不是只以引号里的文件名保存。

Filename:= _
"C:\Documents and Settings\Administrator\桌面\Book1.PDF"

当然如果有前辈能教教我怎么把文件夹里德EXCEL一次性批量转换成PDF就更好了。是要写一个小程序么？

uidn0414 · 发表于 2010-12-1 09:39

你可以到网上下载一个PDF 生成试试，我们公司都是用 PDf 生成器直接打印的

doitbest · 发表于 2010-12-1 09:58

for each x in workbooks
x.saveas filename:="C:\Documents and Settings\Administrator\桌面\" & x.name & ".PDF"
next
注：在2010中能够将文件保存为真正的pdf格式

少剑 · 发表于 2010-12-1 10:05

工作用得上,作个记号,学习用!

fanbarsteng · 发表于 2010-12-1 10:40

谢谢分享，正想学习相关的技巧呢

niuyue · 发表于 2010-12-1 10:50

PDF-XChange Office2PDF
这个软件好用

threedian141 · 发表于 2010-12-2 11:10

http://www.excel123.cn/Article/excelvba/201007/709.html

这里有些好的宏，超好用

jave000 · 发表于 2022-1-29 09:37

很多虚拟打印机本身就支持设置如何保存pdf，比如power pdf

		自动登录	找回密码
密码			免费注册

[求助] 怎样批量将EXCEL转换成PDF并以当前文件名保存

圆满解决