使用VBA刮脚本标签

Question

有没有一种方法可以使用VBA提取pageListIs：和pageItemId的值？

我尝试使用XPATH获取值，但是它返回了整个脚本
XPATH = // script [contains（text（），“ pageItemId：”）] / text（）

sudo ldconfig

有没有一种方法可以仅使用VBA提取两个值？或其他建议？

Answer 1

您可以在例如检索到的字符串上使用分割功能

Option Explicit
Public Sub GetInfo()
    Dim s As String
    s = [A1] '<== I am reading the HTML you showed in from a cell. You would use the HTML retrieve via XPath

    Debug.Print "pageItemId=" & Split(Split(s, "pageItemId:")(1), ",")(0)
    Debug.Print "userId=" & Split(Split(s, "userId:")(1), ",")(0)
End Sub

---

结果：