Sub 宏1()
With Selection.Find
.ClearFormatting
.Font.Name = "宋体"
.Execute FindText:=""
End With
End Sub
如上 我想要的是 查找 不是宋体的内容. .Font.Name <>"宋体",是不行,老有人这么说..
我郁闷,这百度..还有 用For Each r In ActiveDocument.Words 太慢.了 ,没法用.查找一次要5-10分钟,字太多了.find的速度 倒是很快 ,可我就是找不到有什么方法 取反 来查询,参考都看了一天了.