试试下面的代码：
SubMacro3()
OnErrorResumeNext
Dimmypath,myFile$,i&,dAsObject
mypath=[F1]
IfDir(mypath&"*",vbDirectory)=""Then
MsgBox"文件地址不存在，请重新输入"
ExitSub
EndIf
IfRange("C65536").End(xlUp).Row=1Then
MsgBox"请在C列输入新名称"
ExitSub
EndIf
arr=Range("A2:C"&Range("A65536").End(xlUp).Row)
Setd=CreateObject("scripting.dictionary")
d.CompareMode=1
Fori=1ToUBound(arr)
d(arr(i,1))=""
Next
Fori=1ToUBound(arr)
Ifd.Exists(arr(i,3))Then
MsgBox"禁止用与原文件相同的文件名称修改文件名"
ExitSub
EndIf
Next
mypath=mypath&""
Fori=1ToUBound(arr)
Ifarr(i,3)<>""Then
IfDir(mypath&arr(i,1))<>""ThenNamemypath&arr(i,1)Asmypath&arr(i,3)
EndIf
Next
MsgBox"修改完毕"
EndSub
A列为原文件名，C列为修改后文件名，都带文件后缀……
㈡ 如何用EXCEL批量修改pdf名字
试试 ren 的批处理。大概思路就是。
ren "复件 123.pdf" "复 件 new123.pdf"
因为你的有子文件夹， 在前面把内路径加上。
对了容关于获得路径和文件名， 你可以试下这个。
按住SHIFT右键你放PDF的大文件夹。选中“在此处打开命令窗口”。在弹出的窗口内输入， “DIR /S /B >123.XLS”敲下回车， 文件名单就存在表格里面了。
㈢ 如何提取很多pdf文件的文件名称
这个太简单了，只不过是批量提取文件名而已。具体的操作方法如下。
01
第一步，首先我们找到我们要提取表名的文件夹，然后在其中新建一个文本文档。
02
双击打开新建的文本文档，在其中输入一下代码
@echo off
dir *.pdf? /a-d /o:d /b >提取文件名.pdf
这个是批处理代码
通用的，大家复制使用即可。
粘贴后，然后保存。
03
保护后，我们要重命名改文本文件，把后缀名txt改为bat，回车，出现提示，点击是即可。
04
然后，我们可以右击打开，或者双加打开都是可以的。
05
打开后，代码会自动执行，执行后，会出现一个新的提取文件名.xls，这个就是我们上面代码中提到的那个excel文件。
06
我们鼠标双击打开，出现提示，点击是即可。
07
打开后，我们看到文件夹下的工作表名称都提取出来了，你学会了吗？
㈣ EXCEL VBA 自动打印成PDF 并自动取名问题 好难！
要学会变通！
解决方案有2：
❤改用Excel2010，直接VBA中另存为PDF格式。
❤不知道您使用的PDF打印机是哪种？以我用的PDFCreator为例，设置PDFCreator自动打印，并用当前时间为打印的文档自动取名字。这样自动打印的文档名字起码是按照时间排序的。即便是随机取的名字，前后打印出来的PDF本身的文件生成时间也不一样，还是可以在资源管理器中用文件的生成时间进行排序。在资源管理器中选择这189个文件，然后按F2重命名第一个文件为test，按回车后所有的文件都会自动加上编号。当然这种命名的方式灵活性不够。要灵活地批量重命名文件，推荐使用“灵者更名”这款软件，想怎么改就怎么改。
㈤ 如何利用VBA将一个Excel中的每一个工作表都保存为一个PDF文件，文件名为工作表的名字
1、在需要单独保存的工作表上右键，弹出菜单选择移动或复制工作表
2、在第一个里选择新工作薄然后确定
3、然后会出现新的excel文件，接着保存下来
然后每个文件做成PDF文件
推荐下面免费的方法转成PDF试试：
方法一：使用虚拟打印机pdf factory即可，而且其他格式文件只要是能够打印，选择这个虚拟打印机，都可以做成PDF文件，很简单实用；最简单而且实用的使用虚拟打印机pdf factory即可，可以把任意只要能够打印的格式文件都可以做成PDF文件，并且可以把多个文件通过打印之后合成一个PDF文件。
pdfFactory Pro(虚拟打印机)是一个无须 Acrobat 创建 Adobe PDF 文件的打印机驱动程序。pdfFactory Pro(虚拟打印机)提供的创建 PDF 文件的方法比其他方法更方便和高效。 功能包括: 多个文档整合到一个 PDF 文件中; 内嵌字体; 通过 E-mail 发送; 预览; 自动压缩优化。
PDF Factory是pdf虚拟打印机软件，下载安装好PDF Factory后，我们在打印机控制面板中就可以找到一台由pdf Factory虚拟出来的打印机，可以把任何可以打印的文件转换成pdf文件。用任何可以支持打印输出的软件，把需要处理的文件逐个打印到这个虚拟打印机，全部打印完成后可把结果保存成一个pdf文件。甚至可以把不同软件格式的文件，如word、excel、photoshop等任何可以支持打印的文件，打印到同一个pdf文件。
在打印之前，在PDF Factory Pro里面设置一下PDF的打开、打印等权限即可实现加密等目的；
在打印之前，在设置里面，就把加载所有的系统字体选中。
在打印界面出来后，可以在左侧设置水印。然后再保存PDF文件。
打印完毕后，下载一个Adobe Reader,然后安装，可以很流畅的阅读PDF文件。
方法二：使用专门的转换软件，把文件转成PDF文件；
方法三：用其他虚拟打印机转成PDF文件。
方法四：用WPS本身自带的转换功能转成PDF文件。
方法五：其他例如在线转换的方法等；
㈥ 如何批量提取pdf文件名到excel
在放置pdf文件的文件夹中建立一个txt文件，如1.txt，然后输入如下内容：
DIR *.pdf /B >2.TXT
保存后退出，将文件回修改成 1.bat，然后双答击它，当前目录中会生成2.txt文件，里面的内容复制到excel中即可。