word通配符查找替换题注中的空格

我来兜兜风

如图所示，我需要批量的将很长文档中的图XX-XXX 题注  替换为 图XX-XXX  题注，将一个空格替换为两个空格，但是发现通配符可以匹配到正文中的交叉引用文本，却匹配不到题注中的文本，该如何解决呢？

413191246se

1. Sub 题注加空()
   
2.     With Selection
   
3.         .HomeKey 6
   
4.         With .Find
   
5.             .ClearFormatting
   
6.             .Text = "图表"
   
7.             .Replacement.Text = ""
   
8.             .Forward = True
   
9.             .MatchWildcards = True
   
10.             Do While .Execute
    
11.                 With .Parent
    
12.                     Do
    
13.                         .MoveEnd
    
14.                     Loop Until .Next = " "
    
15.                     .InsertAfter Text:=" "
    
16.                     .Font.Color = wdColorRed '红色、本行代码可删除
    
17.                     .Start = .End
    
18.                 End With
    
19.             Loop
    
20.         End With
    
21.     End With
    
22. End Sub

复制代码

我来兜兜风

413191246se 发表于 2020-12-31 10:16

谢谢分享,我采用了一种更傻瓜一点的方法,在查找和替换的条件中,我选择了样式为"题注"的文字,然后直接" "替换为"  "就可以了

413191246se

好方法！祝贺你！楼主。解决问题就好。

1367268951

能解决问题的并符合自己的想法的就是好办法，