Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Выгрузка стоимости валюты в Excel, Парсер или запрос
 
#1
27.03.2021 18:30:50
Моё почтение, уважаемые господа.
Суть такова. Сайт coinmarketcap.com, который устроен банально , без скрытых запросов и использования JavaScript, что есть плюсом для запросов в Excel.
Необходимо выгрузить стоимость валюты, думал 2 варианта.
1) запрос
Тело : coinmarketcap.com/ru/currencies к которому по формуле подставлять вручную введенные нужные валюты &/ethereum/ для получения полной ссылки.
coinmarketcap.com/ru/currencies/ethereum/
Только не знаю можно ли в самом запросе сделать переменную на ячейку которую подставлять?
Так было.
Код
let
    Источник = Web.Page(Web.Contents("https://coinmarketcap.com/ru/currencies/ethereum/")),
    Data0 = Источник{0}[Data],
    #"Измененный тип" = Table.TransformColumnTypes(Data0,{{"Column1", type text}, {"Column2", type text}})
in
    #"Измененный тип"
И чтобы так стало:
Код
let
    Источник = Web.Page(Web.Contents("https://coinmarketcap.com/ru/currencies/&Лист1!B3")),
    Data0 = Источник{0}[Data],
    #"Измененный тип" = Table.TransformColumnTypes(Data0,{{"Column1", type text}, {"Column2", type text}})
in
    #"Измененный тип"
2)Или макрос который к телу coinmarketcap.com/ru/currencies подставлял продолжение ссылки из ячейки на листе  &/ethereum/
и брал данные в HTTM по такому диву с классом "priceValue___11gHJ"

<div class="priceValue___11gHJ">₽128,552.96</div>


Спасибо за понимание.
С Уважением.
 
 
 
#2
27.03.2021 21:56:14
Если хотите выбирать конечный путь к данным из ячейки на листе- можно создать таблицу в которой из выпадающего списка выбирать необходимое окончание.

Эту таблицу загружаем в новый запрос, а потом  результат этого запроса прикрепляем к изначальной  неполной ссылке в первом запросе.
Код
= Web.Page(Web.Contents("https://coinmarketcap.com/ru/currencies/"&Use))


В итоге получаем полную ссылку в зависимости от того, что выбрано в таблице подстановки.
То есть в вашем случае будет вот так.
Код
let
    Источник = Web.Page(Web.Contents("https://coinmarketcap.com/ru/currencies/"&Use)),
    Data0 = Источник{0}[Data],
    #"Измененный тип" = Table.TransformColumnTypes(Data0,{{"Column1", type text}, {"Column2", type text}})
in
    #"Измененный тип"


Вариант в прикрепленном файле на листе "вариант".
После выбора другого источника обновляем таблицу запроса и получаем итоговый результат.
Изменено: Dyroff - 27.03.2021 22:18:59
Нужно бежать со всех ног, чтобы только оставаться на месте, а чтобы куда-то попасть, надо бежать как минимум вдвое быстрее!
 
 
 
Страницы: 1
Наверх