摘要：
Function zhengze(ze As String, Rng As Range) Set regx = CreateObject("vbscript.regexp")With regx .Global = True .Pattern = ze '写正则表达式 Set mat = .Execu 阅读全文
摘要：
Function test(a As Integer)'构造函数名字为test参数为a且为int型 If a >= 90 Then Debug.Print "优秀" test = "优秀" '赋值到单元格，跨表依然适用 ElseIf a >= 60 Then Debug.Print "及格" tes 阅读全文
摘要：
一、是一个对象，用于执行 正则表达式！ 二、有三个属性： 1. Global属性: True or False, 指明模式是匹配整个字符串中所有与之相符的地方还是只匹配第一次出现的地方。默认值是False(表示只匹配第一次出现的地方)。 2. IgnoreCase属性: True or False, 阅读全文
摘要：
Function zhengze(Rng As Range) Set regx = CreateObject("vbscript.regexp")With regx .Global = True .Pattern = "\d{4}-\d{2}-\d{2}" '写正则表达式 Set mat = .Ex 阅读全文