Як витягнути дані з веб-сайту в Excel? [зачинено]


-2

Наприклад,

Якщо я хотів, щоб найдешевша ціна цього товару відображалась у комірці A2 моєї таблиці Excel, чи є якийсь код, який я можу написати, щоб це зробити? Це не безперервне скребкування даних. Можливо знайти ціну раз на день / тиждень.

http://steamcommunity.com/market/listings/440/Strange%20Hillbilly%20Speed-Bump


Ласкаво просимо! Ми не служба написання коду. Що ви вже пробували? Де саме ти застряєш, реалізуючи це?
Ƭᴇcʜιᴇ007

Привіт. Я не шукаю код. Шукаю покажчики. Не впевнений, з чого саме почати, тому що я ніколи цього не робив
QQQ

Код - це те, як ви кажете комп’ютеру знаходити, збирати та обробляти дані. Більше, ніж копіювати / вставляти, знадобиться код, якщо джерело даних вже не надало спосіб доступу до даних у бажаному форматі.
music2myear

Відповіді:


-1

Ось основний приклад, щоб ви рухалися. Він показує, як відображати веб-сайт як лише HTML-код. Звідти вам доведеться визначити, як прочитати те, що знаходиться на сторінці, яку ви перетворили в текст, але, принаймні, це початок:

Private Sub GetWebsiteHtml_Click()

Dim x As Long, y As Long
Dim htmlText As Object

Set htmlText = CreateObject("htmlFile")

With CreateObject("msxml2.xmlhttp")
    .Open "GET", "http://google.com", False
    .send
    htmlText.body.innerHTML = .responsetext
End With

End Sub

htmlText буде змінною, що містить ваш веб-сайт. Я використовував Google для свого прикладу.


Нема проблем. Радий допомогти :)
Eric F

Привіт, Еріко Ф, я не можу зрозуміти, як відобразити htmlText на самому аркуші excel. Діапазон ("A1"). Значення = htmlText призводить до лише [об'єкта] на аркуші. Скажіть, будь ласка, як я можу отримати htmlText на сторінці?
QQQ
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.