如何用VBA将原PDF重命名以显示PDF内人的姓名

老KD

     各位老师好！ 请教大师帮忙编个VBA。本人几百个PDF，如何将这些PDF进行重命名，重命名时将PDF内的保险人姓名显示出来（注意原PDF名字的编号不能去掉）。                 如果能将将这些重命名的PDF转到另一个文件夹这样与原来的未重命名的PDF不混在一起更好 ，   没办法或不能移动另一个文件夹也行。  谢谢大师

老KD

wanghan519 发表于 2024-3-26 22:08
pdftotext是从xpdf官网下载的，用来提取PDF中的文字（非图片有可以选中的文字的PDF）
busybox提供了方便 ...

老师，又来麻烦您了不好意思！还烦请您看看，原来我提供给您的这个PDF的投保人姓名在第1页上，您解决了导出姓名的问题，如附件的最后一个数字 2 的魏邦杰。但，现在有的投保人的姓名在第3页（实际上第1页保险合同四个字下面也有投保人姓名，但这姓名可能是在图片上无法导出），在第3页上姓名的我就不知怎么导出了，还麻烦您再编个程序，太谢谢麻烦大师了

limonet

付费肯定可以。

wanghan519

不太熟悉vba打开word读pdf的操作，想到反正也要遍历重命名，不如直接写批处理，只是调用第三方显得不太专业。。。

limonet

wanghan519 发表于 2024-3-26 18:13
不太熟悉vba打开word读pdf的操作，想到反正也要遍历重命名，不如直接写批处理，只是调用第三方显得不太专业 ...

老师，请教下，这个是怎么做到的？

wanghan519

limonet 发表于 2024-3-26 19:41
老师，请教下，这个是怎么做到的？

pdftotext是从xpdf官网下载的，用来提取PDF中的文字（非图片有可以选中的文字的PDF）
busybox提供了方便的脚本环境，这里用来把输出文本的utf8转gbk，以及用正则去文本中提取姓名，最后把原文件复制命名为新文件
代码都在bat里，不用busybox，只有pdftotext用其他方法写也是大概一样，且这个bat实际是个sh脚本，可以直接用于国产Linux系统
vba可以不用这个，用word打开pdf，然后获取姓名，然后命名为新文件，但我不熟悉写法。。。

老KD

wanghan519 发表于 2024-3-26 18:13
不太熟悉vba打开word读pdf的操作，想到反正也要遍历重命名，不如直接写批处理，只是调用第三方显得不太专业 ...

老师太历害了！！！！太谢谢了！！！虽然我看不懂，但非常实用且非常简便快捷！！

limonet

wanghan519 发表于 2024-3-26 22:08
pdftotext是从xpdf官网下载的，用来提取PDF中的文字（非图片有可以选中的文字的PDF）
busybox提供了方便 ...

谢谢，再请教下：VBA如何获取这个文字流？这个代码怎么写？

perfect131

limonet 发表于 2024-3-27 11:18
谢谢，再请教下：VBA如何获取这个文字流？这个代码怎么写？

自己写个pdf解析器  或者 用现成的pdf解析库

limonet

perfect131 发表于 2024-3-27 12:03
自己写个pdf解析器  或者 用现成的pdf解析库

,暂时没这个本事。

wanghan519

limonet 发表于 2024-3-27 11:18
谢谢，再请教下：VBA如何获取这个文字流？这个代码怎么写？

不熟悉写的不好，感觉这样从utf8转gbk好像有点问题，不过也提取到了