查找除了 中成药 三个字以外的所有中文字符，这个“表达式”怎样写？

13907933959

查找所有中文汉字和中文标点的“表达式”是 [!^1-^127]
可我想、查找除了  中成药  三个字以外的所有中文字符，这个“表达式”该怎样写？
求前辈赐教！谢谢！

duquancai

1. Sub shishi()
   
2.    ActiveDocument.Content.Font.ColorIndex = wdAuto
   
3.    With ActiveDocument.Content.Find
   
4.       .Text = "中成药"
   
5.       .Replacement.Font.Color = RGB(255, 0, 0)
   
6.       .Execute Replace:=wdReplaceAll
   
7.       .Font.ColorIndex = wdAuto
   
8.       Do While .Execute("[!^1-^127]", MatchWildcards:=True)
   
9.          .Parent.Font.Size = 20
   
10.       Loop
    
11.    End With
    
12.    ActiveDocument.Content.Font.ColorIndex = wdAuto
    
13. End Sub

复制代码

13907933959

duquancai 发表于 2016-12-1 15:24

前辈好！
感谢前辈！非常好用！
再请问一下前辈，像这个单独用到手动 “查找替换” 框内的 “表达式” 有不有？
求前辈赐教！谢谢！

13907933959

duquancai 发表于 2016-12-1 15:24

前辈好！
代码中 "中成药" 的设置的字体颜色、红色不起作用。
想劳请前辈增加 "中成药" 的字体、字号、字形、颜色的设置代码，以及文档内其它的中文汉字和中文标点的字体、字号、字形、颜色的设置代码。谢谢！

duquancai

13907933959 发表于 2016-12-2 12:28
前辈好！
代码中 "中成药" 的设置的字体颜色、红色不起作用。
想劳请前辈增加 "中成药" 的字体、字号、 ...

1. Sub shishi()
   
2.     ActiveDocument.Content.Font.ColorIndex = wdAuto
   
3.     With ActiveDocument.Content.Find
   
4.         .Text = "中成药"
   
5.         .Replacement.Font.Color = RGB(255, 0, 0)
   
6.         .Replacement.Font.Size = 14
   
7.         .Execute Replace:=wdReplaceAll
   
8.         .Font.ColorIndex = wdAuto
   
9.         Do While .Execute("[!^1-^127]", MatchWildcards:=True)
   
10.             .Parent.Font.Color = RGB(0, 0, 255)
    
11.             .Parent.Font.Size = 18
    
12.         Loop
    
13.     End With
    
14. End Sub

复制代码

dafanshu1

13907933959 发表于 2016-12-2 08:52
前辈好！
感谢前辈！非常好用！
再请问一下前辈，像这个单独用到手动 “查找替换” 框内的 “表达式”  ...

手动就用 [!中成药^1-^127] 呗。

duquancai

dafanshu1 发表于 2016-12-2 13:12
手动就用 [!中成药^1-^127] 呗。

恐怕不符合楼主的本意!呵呵

dafanshu1

duquancai 发表于 2016-12-2 13:17
恐怕不符合楼主的本意!呵呵

哦，楼主不是想查找“除了  中成药  三个字以外的所有中文字符”吗？我就简单粗暴地直接在[!^1-^127]中加进中成药了。[偷笑]

duquancai

dafanshu1 发表于 2016-12-2 13:32
哦，楼主不是想查找“除了  中成药  三个字以外的所有中文字符”吗？我就简单粗暴地直接在[!^1-^127]中加 ...

楼主本意恐怕是除了"中成药"这三个字组成的整体字符串"本题就是中成药这个词语"以外的所有中文字符。

dafanshu1

duquancai 发表于 2016-12-2 13:37
楼主本意恐怕是除了"中成药"这三个字组成的整体字符串"本题就是中成药这个词语"以外的所有中文字符。

对啊，那查找 [!中成药^1-^127] 不正是可以找到除了“中成药”3个字以外的所有中文字符吗？
还是我理解有误？