如何根据pdf文件列表，批量打印(问题已经解决）

aoranbuqun · 发表于 2011-7-27 23:55

循环到Case "pdf"
                  Dim PDFApp As New Acrobat.AcroPDDoc
                  PDFApp.Open MyFile
pdfapp.open  这里
提示 429
ActuveＸ　部件不能创建对象
不知为什么
Cells(i + 6, 7) = PDFApp.GetInstanceID
                  PDFApp.Close
                  Set PDFApp = Nothing
这里已经设置关闭了

请高手看到的话帮忙看看吧

aoranbuqun · 发表于 2011-7-28 09:15

循环到Case "pdf"
                  Dim PDFApp As New Acrobat.AcroPDDoc
                  PDFApp.Open MyFile
pdfapp.open  这里
提示 429
ActuveＸ　部件不能创建对象
不知为什么
Cells(i + 6, 7) = PDFApp.GetInstanceID
                  PDFApp.Close
                  Set PDFApp = Nothing
这里已经设置关闭了

请高手看到的话帮忙看看吧

zzf_ · 发表于 2011-9-13 13:18

aoranbuqun 发表于 2011-7-28 09:15
循环到Case "pdf"
Dim PDFApp As New Acrobat.AcroPDDoc
PDFAp ...

看看电脑是不是安装了Adobe 专业版呢？

Bigwater · 发表于 2011-9-14 13:21

楼主，你的excel文件怎么打开？提示插入密钥盘？
我也有批量打印PDF需求，想看看你怎么控制打印队列的。
我一次要打印150份以上的PDF文件，一股脑用循环往打印机里塞的话，太暴力了。

leroy · 发表于 2012-6-26 09:49

谢谢楼上的各位老师，收藏了！！！

sharezyx · 发表于 2012-11-18 11:33

本帖最后由 sharezyx 于 2012-11-18 11:54 编辑

zzf_ 发表于 2010-9-20 22:50
基本雏形
宏密码2.71828

求助。。怎样打开啊？我用的是office2010 打开就显示找不到密匙让我躲猫猫求助楼主！！谢谢

sharezyx · 发表于 2012-11-21 20:00

求助。。怎样打开啊？我用的是office2010 打开就显示找不到密匙让我躲猫猫求助！！谢谢！！

zzf_ · 发表于 2013-4-3 14:51

2003版office编制的，VBA密码：2.71828
把This book里面的代码删除就行了

蓝星2012 · 发表于 2013-4-22 16:00

呵呵！我打开后叫我躲猫猫...

xuwenning · 发表于 2014-5-13 13:53

楼主的批量打印与
快刀软件工作室出品的
EXCEL批量打印和批量转PDF 3.0，有得一拼，谢谢收藏了

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

[求助] 如何根据pdf文件列表，批量打印(问题已经解决）

回复 18楼 zzf_ 的帖子