Private Sub Use_TableElement()
Dim Driver As New ChromeDriver
Driver.Get "https://the-internet.herokuapp.com/tables"
Dim tblEle As TableElement, Data()
Set tblEle = Driver.FindElementById("table1").AsTable
Data() = tblEle.Data
Debug.Print Data(2, 2)
tblEle.ToExcel
Driver.Quit
End Sub