1. 如何批量提取word文檔中的題目作為文件名(word第一行生成文件名稱)
假如你d:\word目錄下
復制如下代碼:
dir d:\word\*.doc >d:\word.txt
在桌面新建一個文本文檔,將代碼粘貼進入,將文本文檔的後綴名改為.bat
雙擊運行,它會把d:\word目錄下的word文件全部找出來寫在d:\word.txt文件里。。。
2. 如何批量提取多個Word的文件名
批量提取多個Word的文件名的具體步驟如下:
需要准備的材料分別是:電腦、Word文檔。回
1、首先打開電腦,右鍵答點擊桌面空白處新建一個文本文檔。
2、然後在彈出來的窗口中點擊打開「」
3. 如何將WORD文檔里的特定內容改成文檔名
'在win2000以上系統,可以通過腳本解決該問題。
'基本思路是,創建word對象,遍歷一個目錄下所有文件,通過word對象打開某個文件,完成替換操作,關閉該文件,繼續打開下一個文件。
'前提條件,請將所有要替換的doc文件放置在一個目標文件夾下。
'遍歷一個目錄下所有的文件:
'請注意在執行本程序前將目標文件夾下的文件備份。
'將等號下的文字復制後保存到"替換.vbs"文件即可
'============================
Sub th(folderspec)
Set objWord = CreateObject("word.Application") '創建word對象
objWord.Visible = True '將word程序顯示出來
Set fso=CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(folderspec) 'folderspec指的是目標文件夾的路徑,也就是你放word文件的路徑。
Set fc = f.Files
for each f1 in fc
if LCase(right(f1.name,4))=".doc" then '僅打開doc格式的文件,如果是office2007請換成.docx
path=f.path & "\" & f1.name '這里生產當前選定doc文件的絕對路徑,其中f1.name是word文件名。
Set objDoc = objWord.Documents.Open(path)
Set objSelection = objWord.Selection
objSelection.Find.Replacement.ClearFormatting
objSelection.Find.Text = "1111" '要代替的關鍵字,可根據實際情況修改該參數
objSelection.Find.Replacement.Text = "2222" '本程序將doc中的1111替換為2222,可根據實際情況修改該參數
objSelection.Find.Forward = True
objSelection.Find.Wrap = wdFindContinue
objSelection.Find.Format = False
objSelection.Find.MatchCase = False
objSelection.Find.MatchWholeWord = False
objSelection.Find.MatchByte = True
objSelection.Find.CorrectHangulEndings = False
objSelection.Find.MatchWildcards = False
objSelection.Find.MatchSoundsLike = False
objSelection.Find.MatchAllWordForms = False
objSelection.Find.Execute ,,,,,,,,,,2
objDoc.Save '保存當前文檔
objDoc.Close '退出當前文檔
end if
Next
End Sub
x=InputBox("批量替換工具","請輸入要目標文件夾地址。")
if x<>"" then
th x
end if
4. word怎麼改文件名字
你可以直接右擊文件名,選擇重命名就能更改,也可以在word中選擇文件中的另存為,並更改一個文件名。
5. 如何把文件夾中的word文檔名稱提取出來
假設你文件夾的路徑是 d:\abcd\
按照以下步驟操作:
按鍵盤win+r 或者 開始菜單-運行。
鍵入回cmd ,確定。打開命令答提示符窗口。按下面鍵入命令,每行回車
d: (根據上面假設鍵入盤符,請根據實際情況鍵入)
cd d:\abcd (根據上面假設鍵入路徑,請根據實際情況鍵入)
dir *.doc /b /s > list.txt (把目錄下包括子目錄所有doc文件列表到list.txt文件中,如果是word2007以上版本的文檔改成*.docx。如果不需要子目錄,去掉/s 。)
這樣在目錄下會生成list.txt裡面就是文檔名列表了。