怎么去掉word文档中100以下的数字

word

工具--宏--Visual Basic 编辑器

插入--模块

插入--过程

然后在过程中写入下面的语句With Selection.Find .Execute findtext:=[0-9]@, _ MatchWholeword:=True, MatchWildcards:=True, _ Forward:=True, replacewith:=, Replace:=wdReplaceAllEnd With