wps文档使用的时候打开多个文件,求快速方法一次性替换
发布网友
发布时间:2022-04-29 22:57
我来回答
共1个回答
热心网友
时间:2022-06-25 04:49
写VBA脚本吧,以下是我写好验证过可用的,自己改里边的张三和李四就可以随意替换。
由于我不懂VBA,这是临时搜索的API开发文档乱写出来的,所以写得比较简单,你可以找个懂VBA的人给你做得更智能~~ 例如加个智能提示,例如做成一个控件直接加载进你的wps程序中……
Sub LoopThroughOpenDocuments()
Dim docOpen As Document
For Each docOpen In Documents
Windows(docOpen.Name).Activate
docOpen.Activate
With Selection.Find
.Text = "张三"
.Replacement.Text = "李四"
.Execute Replace:=wdReplaceOne
End With
Next docOpen
End Sub追问能帮忙做一下么,最好能够一次更改多个 不需要太多 有四五个就够用了
我给QB或者帮你冲电话费
追答我已经私信和你联系了,不想把手机号写在外面让别人可以从网上搜到。