正则用不了submatches

晃仙 2019-06-28 07:27:55

Sub demo() '想使用正则表达式进行数据处理，但是调试的时候到正则submatches时候说对象不适用该属性或方法，这是为什么呢？给了s和用正则编辑器的结果，正则表达式应该对的 Worksheets("Sheet2").Activate Dim s As String, myreg As Object, reg1 As Object, myreg1 As Object, i As Integer i = 2 s = Worksheets("Sheet3").Cells(1, 1) Set myreg = CreateObject("VBscript.regexp") With myreg .Global = True .Pattern = "预订\|.*?\|(.*?)\|(?:.*?\|){4}(.*?)\|(.*?)\|(.*?)\|(?:.*?\|){19}(.*?)\|(.*?)\|(.*?)\|" End With Set reg1 = myreg.Execute(s) For Each myreg1 In reg1 Cells(i, 1) = reg1.submatches(0) Cells(i, 2) = reg1.submatches(1) Cells(i, 3) = reg1.submatches(2) Cells(i, 4) = reg1.submatches(3) Cells(i, 7) = reg1.submatches(4) Cells(i, 6) = reg1.submatches(5) Cells(i, 5) = reg1.submatches(6) i = i + 1 Next myreg1

...全文

181 2 打赏收藏转发到动态举报

写回复

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

晃仙 2019-06-29

打赏
举报

回复

老师老师，是我写错了，我写成了reg1.应该是myreg1

milaoshu1020 2019-06-28

打赏
举报

回复

第几个reg1.submatches(?)出的错?

下面的代码演示了如何从一个正则表达式获得一个 SubMatches 集合以及它的专有成员：正则表达式(一个邮箱地址): (\w )@(\w )\.(\w ) 如果你没有进一步了解元字符,可能不懂其中含义,不过没关系,在这里你只要知道,该代码的任务是显示电子邮箱dragon@xyzzy.com,用户名和组织名. Function SubMatchTest(inpStr) Dim oRe, oMatch, oMatches Set oRe = New RegExp ' 查找一个电子邮件地址 oRe.Pattern = "(\w )@(\w )\.(\w )" ' 得到 Matches 集合 Set oMatches = oRe.Execute(inpStr) ' 得到 Matches 集合中的第一项 Set oMatch = oMatches(0) ' 创建结果字符串。 ' Match 对象是完整匹配 — dragon@xyzzy.com retStr = "电子邮件地址是： " & oMatch & vbNewline ' 得到地址的子匹配部分。 retStr = retStr &

非常经典的正则表达式入门教程，学会了这个不同语言的正则表达式看一眼文档就会用

回溯我理解的就是递归，一直在判断“*”的存在，最后递归得出结果 class Solution: def isMatch(self, s: str, p: str) -> bool: if not p: return not s f= bool(s and p[0] in {s[0],'.'}) if len(p) >= 2 and p[1] == "*": return self.isMatch(s, p[2:]) or f and self.isMatch(s[1:], p)

调用在一个字符串中查找多个RegExp匹配项不必遍历RegExp#exec ，不可变的并且具有更好的结果格式。安装 $ npm install execall 用法 import execAll from 'execall' ; execAll ( / ( \d + ) / g , '$200 and $400' ) ; /* [ { match: '200', subMatches: ['200'], index: 1 }, { match: '400', subMatches: ['400'], index: 10 } ] */ 原料药 execAll（regexp，字符串）返回带有匹配项，子匹配项和索引的object[] 。正则表达式类型： RegExp 正则表达式匹配string 。细绳类型： string 有关的替换字符串中的

vba中的正则分组：SubMatches的使用

2,462

社区成员

10,807

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章