VBA копировать WebTable в Excel - PullRequest
0 голосов
/ 26 апреля 2018

У меня есть макрос, который открывает IE и переходит на веб-страницу. Так что теперь на веб-странице есть несколько таблиц. Я пытаюсь скопировать последний на страницу в Excel для дальнейших вычислений, но он копирует все значения из всей таблицы в одну ячейку. Как получить код для разделения текста на ячейки? Столбцы будут фиксированными для каждой страницы, но количество строк может отличаться.

Worksheets("temp").Range("A1").Value = ie.document.getelementsbytagname("Table")(32).innertext

1 Ответ

0 голосов
/ 26 апреля 2018

Вот что я использовал в прошлом:

Поскольку в таблице, скорее всего, будут строки и столбцы (td, tr), вы не можете назначить все данные одному диапазону / ячейке.

Метод, который я прекратил использовать, состоял в том, чтобы скопировать всю таблицу в буфер обмена и вставить ее в ячейку / диапазон A1.

Set clipboard = New MSForms.DataObject
clipboard.SetText ie.document.getelementsbytagname("Table")(32).outerHTML
clipboard.PutInClipboard
Worksheets("temp").Cells(1, 1).PasteSpecial

Редактировать: вам нужно будет добавить ссылку на библиотеку объектов Microsoft Forms 2.0

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...