求助：bat如何批量删除多个word文档里的分页符

453765918 · 发表于 2023-10-20 14:06:48

bat如何批量删除多个word文档里的分页符

Five66 · 发表于 2023-10-21 05:09:48

Batcher · 发表于 2023-10-21 11:56:22

回复 1# 453765918

test.bat

# & cls & @cd /d "%~dp0" & powershell -c "Get-Content '%~0' | Out-String | Invoke-Expression " & exit /b
# 设置待处理的文件所在的文件夹路径
$OldFolder = "C:\Test\From"
# 处理之后的文件保存到新的文件夹路径
$NewFolder = "C:\Test\To"
$Word = New-Object -ComObject Word.Application
Get-ChildItem -Path $OldFolder "*.docx" | ForEach-Object {
$_.FullName
$NewName = $NewFolder + "" + $_.Name
$Doc = $Word.Documents.Open($_.FullName)
$Select = $Word.Selection
$Select.WholeStory()
$OldStr = "^m"
$NewStr = ""
$Select.Find.Execute($OldStr, $false, $true, $false, $false, $false, $true, $false, $false, $NewStr)
$Doc.SaveAs($NewName)
$Doc.Close()
}
$word.Quit()

复制代码

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文本处理] 求助：bat如何批量删除多个word文档里的分页符