怎样批量设置word文件名

『壹』 如何批量提取多个word的文件名

批量提取多个Word的文件名的具体步骤如下：

需要准备的材料分别是：电脑、Word文档。

1、首先打开电脑，右键点击桌面空白处新建一个文本文档。

2、然后在弹出来的窗口中点击打开“”

『贰』 如何快速给大量word文件重命名

可以用脚本来做。

1、用记事本新建一个文本文件，把它保存为“批量重命名.vbs”（注意不要弄成了“批量重命名.vbs.txt”，也就是要确保其扩展名为“.vbs”）；
2、把下列代码粘贴到这个VBS文件中：
Option Explicit
Const g_strRootPath = "c:\Temp\docs\Word\ToRename\" ' 指定存放所有文件的目录，可以有子目录
Const g_nTitleMaxLen = 16 ' 指定获取文档里面第一段中的前多少个字符来作为文件名
Call Main
' 主函数入口
Sub Main()
Dim fso, oFolder, oWordApp
Set oWordApp = CreateObject("Word.Application")
Set fso = CreateObject("Scripting.FileSystemObject")
Set oFolder = fso.GetFolder(g_strRootPath)
RenameDocFilesUnderFolder oWordApp, fso, oFolder
oWordApp.Quit
Set oWordApp = Nothing
MsgBox "完成！"
end Sub
' 重命名指定文件夹（递归）下面的所有Word文件，按照文件里面的第一句可见的文字命名
Sub RenameDocFilesUnderFolder(oWordApp, fso, oFolder)
Dim oSubFolder, oFile, oDoc
Dim strTitle, strFileName
For Each oSubFolder In oFolder.SubFolders
RenameDocFilesUnderFolder oWordApp, fso, oSubFolder
next
For Each oFile In oFolder.Files
Set oDoc = oWordApp.Documents.Open(oFile.Path)
strTitle = GetFirstVisibleTextContent(oDoc)
oDoc.Close
Set oDoc = Nothing
If Len(strTitle) <> 0 Then
strFileName = fso.BuildPath(fso.GetParentFolderName(oFile.Path), strTitle & "." & fso.GetExtensionName(oFile.Path))
strFileName = GetUniqueFileName(fso, strFileName)
fso.MoveFile oFile.Path, strFileName
end If
next
end Sub
' 获取指定文档第一行可见文字
Function GetFirstVisibleTextContent(oDoc)
Dim oParagraph
Dim strContent
For Each oParagraph In oDoc.Paragraphs
strContent = GetSafeFileName(oParagraph.Range.Text)
If Len(strContent) <> 0 Then
GetFirstVisibleTextContent = strContent
Exit Function
end If
next
GetFirstVisibleTextContent = ""
end Function
' 过滤文件名里面的无效字符
Function GetSafeFileName(strFileName)
Dim arrUnsafeCharacters, strUnsafeChar
Dim nIndex
arrUnsafeCharacters = Array("\", "/", ":", "*", "?", """", "<", ">", "|")
For nIndex = 0 To &H2F
strFileName = Replace(strFileName, Chr(nIndex), "")
next
For Each strUnsafeChar In arrUnsafeCharacters
strFileName = Replace(strFileName, strUnsafeChar, "")
next
GetSafeFileName = left(Trim(strFileName), g_nTitleMaxLen)
end Function
' 获取不重复的文件名，如果有重名则在文件名后面附加“_1”、“_2”……
Function GetUniqueFileName(fso, strFullName)
Dim strParentFolder, strBaseName, strExtensionName
Dim nIndex
If Not fso.FileExists(strFullName) Then
GetUniqueFileName = strFullName
Exit Function
end If
strParentFolder = fso.GetParentFolderName(strFullName)
strBaseName = fso.GetBaseName(strFullName)
strExtensionName = fso.GetExtensionName(strFullName)
nIndex = 0
While fso.FileExists(strFullName)
nIndex = nIndex + 1
strFullName = fso.BuildPath(strParentFolder, strBaseName & "_" & nIndex & "." & strExtensionName)
Wend
GetUniqueFileName = strFullName
End Function

3、修改代码中开始部分的两个设置，即：存放等待重命名的Word文件的根目录，以及获取文档第一段内容时最多保留多少个字符。
4、保存这个VBS文件，在资源管理器中双击运行它，直到看见“完成”！
5、检查所有文件是否已自动重命名。
注意：如果有两个以上的文档依据其内容提取出来的文字相同，则会自动在文件名后面附加“_1”、“_2”、“_3”……。

『叁』 如何批量修改文件名

批量修改文件名的方法：

步骤1，下载文件批量重命名软件后安装打开，将需要重命名的文件拖入软件中，也可以点击【添加文件】按钮进行添加，支持所有文件格式。

『肆』 如何用CMD命令批量修改word文件名如何将副本文件名批量修改

打开cmd命令行程序。
1、首先，打开cmd命令行程序：依次点击“开始”，“运行”，输入命令cmd，即可弹出cmd命令行程序。2、下面开始批量修改文件名：首先看看如何批量修改文件名的后缀，几十个甚至几百个txt文档，要把它们全部改成png图片文件。3、在cmd命令行程序中输入如下命令：cd c： est en *.txt *.png4、再来查看目标文件，发现已经全部修改过来了。

『伍』 如何批量重命名word文档名称

您好，方法
1、首先我们打开我们将我们需要重命名的word文档放到一个文件夹中，之后按下windows键+R键，输入cmd，确定。
2、之后先输入我们文件夹所在盘符如我的“E：”，确定，然后输入"cd +我们存放word文档的文件路径“，最后输入”dir /b>E:\重命名word\名称.txt“，提取我们文件夹中的名称，且存放在新建的”名称.txt“文本中。
3、我们打开提取的txt文本，将里面的word名称粘贴复制到excel列中，另外一列放我们需要修改的名称。
4、新建一个word文档，输入内容“ren 中间空两格 .docx ”。
5、单击菜单栏”邮件-开始邮件合并-目录“，弹出的窗口选择表一，勾选首行包含列标题之后“确定，然后选择收件人-使用现有列表“，选择我们的excel文件，确定，
6、单击”插入合并域“，进行我们Excel列的插入，如下图，之后将鼠标定位至下一行。
7、单击”完成并合并-编辑单个文档“，弹出的窗口选择”全部”，单击确定。
8、将我们生成的内容复制粘贴进入刚提取名称的cmd命令行。
9、然后就可以打开我们的文件夹查看我们重命名的word文档了。

『陆』 如何批量修改文件名称

批量修改文件名的方法：

步骤1，下载上方的软件后安装打开使用。随后点击【添加文件】，批量将需要格式转换的文件添加到软件中，支持从不同文件夹中添加。

『柒』 WORD批量更改文件名

批量修改word文件名的方法：

步骤1，下载“优速文件批量重名”工具软件后安装打开，如 下图所示点击任意一个红框，将需要修改名称的word文件添加到软件中，可以从不同文件夹中添加哦！

『捌』 word文件如何批量改名

使用dos命令来，在文件所自在目录 dir/b>1.txt 获得文件名，存在1.txt里面。
然后用excel打开1.txt，与人员名单表格对应。做成ren A.doc B.doc 样式（将A名称替换为B名称），注意中间的空格，存为txt文件。
然后新建txt输入下面代码。重复 ren A.doc B.doc
@echo off
echo 正在替换文件名，请稍等......
#示例
ren A.doc B.doc
#说明：把A文件名替换成B文件名
echo 替换文件名完成!
echo. & pause

另存为.bat，执行即可