如何WORD 数字一下去掉

因为组成数字的总共就10个，从0-9，查找替换10次（把数字替换成空格之类的），肯定文章中的数字都不复存在了，想一次性把里面的数字部分全都删除好像还没有什么好方法，暂且按我说的来吧，先把问题解决了再说！

或者写一个宏：
Public Sub delnum()
Selection.WholeStory
Set myRange = ActiveDocument.Range(Start:=0, End:=Selection.End)
For Each aChars In myRange.Characters
If aChars.Text = "0" Or aChars.Text = "1" Or aChars.Text = "2" Or aChars.Text = "3" Or aChars.Text = "4" Or aChars.Text = "5" Or aChars.Text = "6" Or aChars.Text = "7" Or aChars.Text = "8" Or aChars.Text = "9" Then aChars.Delete
Next aChars
End Sub

在替换对话框中输入“查找内容” ^# “替换”为空，
就一下子都没有了。

那总有个“高级” 吧？选 “特殊字符” ，然后选 “任意数字” 。全部替换