求批处理方法批量设置WORD页眉、页脚为0.5

qd2024 · 发表于 2023-8-4 08:18:24

有大量WORD文件需要设置页眉、页脚为0.5CM，求批处理命令，需要同时处理所有子目录下文件。
当前使用Microsoft® Word 2016MSO (版本 2307 Build 16.0.16626.20110) 32 位版本。
谢谢。

wanghan519 · 发表于 2023-8-4 09:38:19

不知道理解的对不对，用powershell

$wd = New-Object -ComObject word.application
dir *.doc* | % {$d=$wd.Documents.Open($_.FullName);$d.PageSetup.HeaderDistance=42.5;$d.PageSetup.FooterDistance=42.5;$d.Save();$d.Close()}
$wd.Quit()

复制代码

qd2024 · 发表于 2023-8-4 09:50:29

回复 2# wanghan519
辛苦但是没有成功，我上传了一些例子帮忙看一下感谢

链接：https://pan.baidu.com/s/1cFG_bSGz405NU2RWaKdEfg?pwd=8yp6
提取码：8yp6
--来自百度网盘超级会员V9的分享

wanghan519 · 发表于 2023-8-4 09:59:09

本帖最后由 wanghan519 于 2023-8-4 10:00 编辑

回复 3# qd2024

上面的是页眉页脚那个距离，如果是指页边距，第二句应该改成

dir *.doc* | % {$d=$wd.Documents.Open($_.FullName);$d.PageSetup.TopMargin=14.2;$d.PageSetup.BottomMargin=14.2;$d.Save();$d.Close()}

复制代码

qd2024 · 发表于 2023-8-4 10:30:32

回复 4# wanghan519

是的我是要修改页眉和页脚但是无论在根下还是子目录文件都没有被更改

wanghan519 · 发表于 2023-8-4 11:06:50

本帖最后由 wanghan519 于 2023-8-8 03:46 编辑

回复 5# qd2024

加上了处理子文件夹，改了数值

$wd = New-Object -ComObject word.application
dir -Recurse *.doc* | % {$d=$wd.Documents.Open($_.FullName);$d.PageSetup.HeaderDistance=14.2;$d.PageSetup.FooterDistance=14.2;$d.Save();$d.Close()}
$wd.Quit()

复制代码

Batcher · 发表于 2023-8-4 11:14:23

回复 5# qd2024

你用什么系统测试的，Win7? Win10? Win11? 看看你系统里面的PowerShell版本是什么

qd2024 · 发表于 2023-8-4 20:35:27

qd2024 · 发表于 2023-8-4 20:39:19

回复 6# wanghan519

测试后文件没有被修改麻烦帮忙看看什么原因

wanghan519 · 发表于 2023-8-5 08:50:36

本帖最后由 wanghan519 于 2023-8-5 10:41 编辑

回复 9# qd2024

应该不是32位的问题，把报错信息发出来吧。呃，该不会没有cd到目标文件夹就直接运行代码了，那罪过就大了，可能把用户目录下的docx都改了。。。

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

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

[文本处理] 求批处理方法批量设置WORD页眉、页脚为0.5