Привет я импортирую всю таблицу с веб-сайта в строку Excel:

Dim fST As String
fST = Doc.getElementsByTagName("table")(0).innerText

после этого я хотел бы разделить таблицу внутри ячеек Excel и выполнить разбиение, используя<td> теги из таблицы html, или, по крайней мере, это вариант, для которого, я думаю, можно сделать, чтобы импортированная таблица была такой же внутри Excel, как только она будет импортирована, каждое значение будет находиться внутри отдельной ячейки.

Дай мне знать, спасибо.

Вот весь конд, который я использую:

Private Sub Worksheet_Change(ByVal Target As Range)

 If Target.Row = Range("URL").Row And _
 Target.Column = Range("URL").Column Then
    Dim IE As New InternetExplorer
    IE.Visible = True
    IE.navigate Application.ActiveSheet.Range("URL")
    Do
        DoEvents
        Loop Until IE.readyState = READYSTATE_COMPLETE
    Dim Doc As HTMLDocument
    Set Doc = IE.document

    Dim tbl, trs, tr, tds, td, r, c

    Set tbl = Doc.getElementsByTagName("table")(0)
    Set trs = tbl.getElementsByTagName("tr")

    For r = 1 To trs.Count
        Set tds = trs(r).getElementsByTagName("td")
        For c = 1 To tds.Count
            ActiveSheet.Cells(r, c).Value = tds(c).innerText
        Next c
    Next r
    IE.Quit
 End If
End Sub

Но он говорит об ошибке: Object не поддерживает это свойство или метод в следующей строке: Для r = 1 To trs.Count