正则表达式基础符号（1）

除非注明，文章均为战战如疯原创，转载请保留链接:http://www.zhanzhanrufeng.com/cat4/464.html，VBA交流群273624828。

从这节开始分享一些正则表达式的基础符号和例子，我自己关于这方面的资料比较少，都是网上搜集的，大家看看即可。

先看几个符号：

\将下一个字符标记为一个特殊字符、或一个原义字符、或一个向后引用、或一个八进制转义符。例如，“\\n”匹配\n。“\n”匹配换行符。序列“\\”匹配“\”而“\(”则匹配“(”。

\d匹配一个数字字符。等价于[0-9]。

\D匹配一个非数字字符。等价于[^0-9]。

\w匹配包括下划线的任何单词字符。等价于“[A-Za-z0-9_]”。

\W匹配任何非单词字符。等价于“[^A-Za-z0-9_]”。

.点匹配除“\r\n”之外的任何单个字符。要匹配包括“\r\n”在内的任何字符，请使用像“[\s\S]”的模式。

第一个\就是为了转义，比如"\n"代表换行符，如果你想要匹配的是字符串"\n"本身而不是换行符就要在前面再加一个\。剩下几个都很简单，一看就明白，下面看个例子。

还看上节那个挖掘机的例子

Sub Macro()

Dim str, regx

str = "学挖掘机1234哪789家00强"

Set regx = CreateObject("VBScript.RegExp")

With regx

.Global = True

.Pattern = "\d"

str = .Replace(str, "")

End With

MsgBox str

End Sub

如上面所说的\d匹配所有数字字符，那我将所有数字字符都替换为空那就只剩下了汉字，同理，如果我想只数字，把汉字去掉，那只要把Pattern属性变为"\D"即可，匹配所有非数字，然后再将其替换为空。

当然如果我们的原字符串中再加上一些英文字母，比如"学挖掘机1234A哪789B家00C强"，要想提取出汉字就得匹配任何单词字符，再将其替换，那Pattern就是"\w"，反过来要去汉字就得写成大写的"\W"。