主题：金字塔vba可以使用正则表达式吗?

可以的，下面的代码是读取网页内容，然后用正则表达式进行分析的：

    On Error Resume Next
    Set regEx = CreateObject("VBScript.RegExp")
    With CreateObject("WinHttp.WinHttpRequest.5.1")
        .Open "GET", "http://data.eastmoney.com/zjlx/detail.html", False
        .setRequestHeader "Connection", "Close"
        .setRequestHeader "Content-Type", "text/html; charset=gb2312"
        '.setRequestHeader "User-Agent", "Mozilla/30.0"
        .Send
        respText = .responseText
    End With
   
    'Debug.Print respText
   
    pattern = pattern = """\d{6},.+?"""             '   """" & "\d{6}"
    'pattern = "<a href=""http://quote.eastmoney.com/" & "\w{2}" & "\d{6}" & ".html"">" & "\d{6}"
    '<a href="http://quote.eastmoney.com/SZ002190.html">----测试OK
    With regEx
        .Global = True
        .pattern = pattern
    End With

    Set matchs = regEx.Execute(respText)