怎樣批量設置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，執行即可