vba清除非打印字符 如何用函数或vba判断非打印字符

vba中，怎去除一个字符串中的 非中文非数字非大小写字母？不会正则啊 Sub aaa()With CreateObject("vbscript.RegExp")Global=Trueignorecase=TruePattern="[^0-9...