Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Найти таблицу на сайте и выгрузить из нее информацию. - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Найти таблицу на сайте и выгрузить из нее информацию. (Макросы/Sub)
Найти таблицу на сайте и выгрузить из нее информацию.
DmitryS Дата: Среда, 13.06.2018, 23:44 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Добрый день!

Помогите, пожалуйста, со следующей задачей.

Есть сайт, например, "https://worldwide.espacenet.com/publicationDetails/biblio?CC=DE&NR=102007012539A1&KC=A1&FT=D&ND=4&date=20080925&DB=EPODOC&locale=en_EP"
Необходимо вытащить всю обновляемую информацию (таблица "div#pagebody") с картинкой.
Пытался сделать разными способами, не смог выгрузить даже текст.
К сообщению приложен файл: 2822107.xlsm(21.8 Kb)
 
Ответить
СообщениеДобрый день!

Помогите, пожалуйста, со следующей задачей.

Есть сайт, например, "https://worldwide.espacenet.com/publicationDetails/biblio?CC=DE&NR=102007012539A1&KC=A1&FT=D&ND=4&date=20080925&DB=EPODOC&locale=en_EP"
Необходимо вытащить всю обновляемую информацию (таблица "div#pagebody") с картинкой.
Пытался сделать разными способами, не смог выгрузить даже текст.

Автор - DmitryS
Дата добавления - 13.06.2018 в 23:44
doober Дата: Четверг, 14.06.2018, 01:42 | Сообщение № 2
Группа: Друзья
Ранг: Обитатель
Сообщений: 477
Репутация: 226 ±
Замечаний: 0% ±

Excel 2007
Здравствуйте.
Таблица выгружается так.[vba]
Код
    Set r = IE.Document.getElementById("body").getElementsByTagName("table")(0)
    sAnswer = r.innerText
[/vba]
С картинкой не так все просто, способа ее добыть не нашел.


 
Ответить
СообщениеЗдравствуйте.
Таблица выгружается так.[vba]
Код
    Set r = IE.Document.getElementById("body").getElementsByTagName("table")(0)
    sAnswer = r.innerText
[/vba]
С картинкой не так все просто, способа ее добыть не нашел.

Автор - doober
Дата добавления - 14.06.2018 в 01:42
DmitryS Дата: Понедельник, 18.06.2018, 23:08 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
doober, спасибо, сильно помогло!
Не могли бы Вы помочь более детально, если можно.
1) Самое критичное. Это необходимо в итоге вставить в ворд, поэтому лучше вытащить все в виде структурированной таблицы, а еще лучше скопировать. Это можно сделать?

2) Если оставить
[vba]
Код
Set r = IE.Document.getElementById("body")
[/vba]
, то информации выгружается больше, но все равно не берет заголовок — "Bibliographic data: DE102007012539 (A1) ― 2008-09-25"
 
Ответить
Сообщениеdoober, спасибо, сильно помогло!
Не могли бы Вы помочь более детально, если можно.
1) Самое критичное. Это необходимо в итоге вставить в ворд, поэтому лучше вытащить все в виде структурированной таблицы, а еще лучше скопировать. Это можно сделать?

2) Если оставить
[vba]
Код
Set r = IE.Document.getElementById("body")
[/vba]
, то информации выгружается больше, но все равно не берет заголовок — "Bibliographic data: DE102007012539 (A1) ― 2008-09-25"

Автор - DmitryS
Дата добавления - 18.06.2018 в 23:08
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Найти таблицу на сайте и выгрузить из нее информацию. (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2018 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!