office-word:谁能告诉我-如何批量在每行的末端添加(东西)

office-word:谁能告诉我-如何批量在每行的末端添加(东西),第1张

批量的方法,肯定是要使用通配符进行查找替换了。用通配符之前,一定要认真分析文本特征,写出合适的表达式,才能达到你的目的。

根据你提供的文本,可以总结为:在以任意多个小写字母结尾的段落后面加一个数字5。所以查找表达式可以写成([a-z]{1,})^13     ([a-z]{1,})代表任意多个小写字母,^13代表段落标志。替换表达式可以写成\15^p         \1代表查找中第一个圆括号匹配到的内容,5就是数字5,^p代表段落标志。具体设置如下图所示。

录制一个宏,添加一个按钮或者快捷键,然后把所有的文件全部打开,每个文件点一下录制宏的按钮,然后保存,关闭。这样的也要快点。

录制宏的办法:

开发工具默认是隐藏的,首先要在选项中打开“开发工具”

勾选开发工具

点击确定后,就会在菜单栏多出一个开发工具,里面有录制宏的按钮。

点击录制宏

输入宏名,选择按钮或键盘。选择按钮就会增加一个快速按钮,选键盘就定义一个快捷键。后面以按钮为例:

点击按钮后,d出下列对话框,

选择与宏名对应的按钮,点击添加,到右边快速访问工具栏。

在左上角增加一个快捷按钮。

然后就开始录制宏,尽量用键盘 *** 作。我录制的宏代码如下:

Sub 宏1()

'

' 宏1 宏

'

'

    Selection.MoveDown Unit:=wdLine, Count:=1000

    Selection.TypeText Text:="【】"

    Selection.MoveLeft Unit:=wdCharacter, Count:=1

    Selection.TypeText Text:="文本结束"

End Sub

解释一下:从开始向下移动鼠标1000行(如果你的每个文件超过了1000行,就把数字改大一点),先输入【】,然后输入【文本结束】,结束。

最好是自己录制一个代码,然后全选所有的word文件,按确定,全部打开,每个文件都点一下宏按钮,然后保存关闭。你也可以把保存关闭的过程录制到宏里面。这样就可以很快处理完毕了。

用replace

pioneer可以批量对不同的文件做不同的替换。

假设有10000个文件,以及一个文件d:\test\a.txt,其中包含10000个替换词,现在需要:

把第1个文件里的“张三”替换为a.txt里第1行的内容,

把第2个文件里的“张三”替换为a.txt里第2行的内容,...以此类推

详细步骤如下:

1.打开replace

pioneer的tools->batch

runner菜单

2.把10000个文件从windows拖拽到batch

runner窗口中,确认顺序是正确的

3.点击fast

replace按钮

*

点击add添加替换规则:

在search输入"张三"

在replace输入file_line("a.txt",$file_no,"d:\\test\\")

*

完成后点击ok

*

确认reg

exp选项是选中的,然后点击start即可。

注意:

1.提前备份,以防 *** 作失误。

2.如果是添加不是替换,那么要看添加的具体位置,如果添加在文件尾,那么在search输入一个$即可。

原文参考这个例子,怎样把100行文本分别添加到100个文件头:

how

to

insert

100

different

lines

into

the

beginning

of

100

text

files?


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11836765.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-19
下一篇 2023-05-19

发表评论

登录后才能评论

评论列表(0条)

保存