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

Вход

Регистрация

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

 

= Мир MS Excel/Получение данных в таблицу с сайта - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Получение данных в таблицу с сайта
vvg_anics Дата: Вторник, 17.01.2012, 10:59 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

Здравствуйте.
Кто-нибудь подскажет, можно ли получить данные с интернет-сайта в таблицу Excel?
Мне нужно, чтобы в ячейку возвращались курсы валют на текущий день.
В принципе, на сайте РБК например, данные о курсах введены как раз в таблицу. Тут, конечно, есть проблема извлечения их Xml-кода.
Есть ли способ всё-таки получать текущие курсы валют в ячейки таблицы?
Заранее спасибо.
 
Ответить
СообщениеЗдравствуйте.
Кто-нибудь подскажет, можно ли получить данные с интернет-сайта в таблицу Excel?
Мне нужно, чтобы в ячейку возвращались курсы валют на текущий день.
В принципе, на сайте РБК например, данные о курсах введены как раз в таблицу. Тут, конечно, есть проблема извлечения их Xml-кода.
Есть ли способ всё-таки получать текущие курсы валют в ячейки таблицы?
Заранее спасибо.

Автор - vvg_anics
Дата добавления - 17.01.2012 в 10:59
Serge_007 Дата: Вторник, 17.01.2012, 11:02 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеИмпорт курса валют из интернета

Автор - Serge_007
Дата добавления - 17.01.2012 в 11:02
vvg_anics Дата: Вторник, 17.01.2012, 11:14 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

Спасибо, отличная ссылка.
Пока не получается, но, разберусь, я думаю.
 
Ответить
СообщениеСпасибо, отличная ссылка.
Пока не получается, но, разберусь, я думаю.

Автор - vvg_anics
Дата добавления - 17.01.2012 в 11:14
808 Дата: Пятница, 27.01.2012, 16:55 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 44
Репутация: 10 ±
Замечаний: 0% ±

Коллеги, у меня тоже не получается. Excel после описанных в посте по ссылке мероприятий выводит единственную строку "выберите город". Штука уж очень интересная, помогите сделать с курсами $.

С других сайтов где есть курсы - ситуация примерно аналогичная....
 
Ответить
СообщениеКоллеги, у меня тоже не получается. Excel после описанных в посте по ссылке мероприятий выводит единственную строку "выберите город". Штука уж очень интересная, помогите сделать с курсами $.

С других сайтов где есть курсы - ситуация примерно аналогичная....

Автор - 808
Дата добавления - 27.01.2012 в 16:55
Serge_007 Дата: Пятница, 27.01.2012, 16:57 | Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение

Автор - Serge_007
Дата добавления - 27.01.2012 в 16:57
Hugo Дата: Суббота, 28.01.2012, 01:50 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Вот как-то делал для "Леночки" - Молдавские курсы, кстати тянутся из xml, но алгоритмом обработки текста. Хотя для xml есть свой инструмент...

Вот ещё коротко схема - всего пара строк, если известно что и за какой день нужно взять:
[vba]
Code
Private Sub Code1()

With CreateObject("MSXML2.XMLHTTP")
.Open "GET", "http://www.ecb.europa.eu/stats/eurofxref/eurofxref-daily.xml", False
.Send
Cells(1, 1) = Mid(.responseText, InStr(1, .responseText, "USD") + 11, 6)
End With

End Sub
[/vba]
К сообщению приложен файл: Kurs_valjut_dlj.xls (53.5 Kb)


webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеВот как-то делал для "Леночки" - Молдавские курсы, кстати тянутся из xml, но алгоритмом обработки текста. Хотя для xml есть свой инструмент...

Вот ещё коротко схема - всего пара строк, если известно что и за какой день нужно взять:
[vba]
Code
Private Sub Code1()

With CreateObject("MSXML2.XMLHTTP")
.Open "GET", "http://www.ecb.europa.eu/stats/eurofxref/eurofxref-daily.xml", False
.Send
Cells(1, 1) = Mid(.responseText, InStr(1, .responseText, "USD") + 11, 6)
End With

End Sub
[/vba]

Автор - Hugo
Дата добавления - 28.01.2012 в 01:50
Chieskela Дата: Суббота, 04.02.2012, 22:25 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Ни один сайт не выдаст котировки в режиме реального времени, самое лучшее, это с опозданием минимум 15 минут. Лучше всего открыть счет у брокера Форекс (можно даже учебный) и установив от них программное обеспечение (бесплатно) получать котировки On-Line. Кстати их можно извлекать очень просто в Excel, о чем будет очень доходчиво описано в документации к торговому терминалу. Открыть счет можно прямо по Инету.


Все, что ни делается, к лучшему!!!

Сообщение отредактировал Chieskela - Суббота, 04.02.2012, 22:26
 
Ответить
СообщениеНи один сайт не выдаст котировки в режиме реального времени, самое лучшее, это с опозданием минимум 15 минут. Лучше всего открыть счет у брокера Форекс (можно даже учебный) и установив от них программное обеспечение (бесплатно) получать котировки On-Line. Кстати их можно извлекать очень просто в Excel, о чем будет очень доходчиво описано в документации к торговому терминалу. Открыть счет можно прямо по Инету.

Автор - Chieskela
Дата добавления - 04.02.2012 в 22:25
  • Страница 1 из 1
  • 1
Поиск:

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