请问WORD怎么用宏清楚查找里面的格式

o0star0o

如图，每次ctrl+f按格式查找，或用通配符查找后，都需要手动做还原，删除那行格式记录，请问怎么用宏，做个“清除”让word回到才打开的状态那种

413191246se

楼主，你的要求似乎做不到！但是，可以用宏来查找字符完成需要的功能。下面是全文查找的标准程序：

1. Sub FindActiveDocument()
   
2. '全文查找/光标不动/不激活对象/速度极快！
   
3.     With ActiveDocument.Content.Find
   
4.         .ClearFormatting
   
5.         .Text = "[0-9.,， 　^s^t]{1,}元"
   
6.         .Forward = True
   
7.         .MatchWildcards = True
   
8.         Do While .Execute
   
9.             With .Parent
   
10.                 .Font.Color = wdColorRed
    
11. '                .Start = .End
    
12.             End With
    
13.         Loop
    
14.     End With
    
15. End Sub

复制代码