Форум программистов, компьютерный форум, киберфорум
MS Office Excel
Войти
Регистрация
Восстановить пароль
Другие темы раздела
MS Excel Как распечатать расчетную таблицу с отображением формул ЗАДАНИЕ 3. (MS Excel) 1. Создать в MS Excel расчетную таблицу с обрамлением (границы внешние и внутренние) для указанной прикладной задачи (Приложение 2). 2. Выполнить необходимые расчеты. ... https://www.cyberforum.ru/ ms-excel/ thread1373108.html MS Excel Расшаренный файл Excel
Товарищи, всем привет! Вопрос: есть файл Excel, в котором содержится необходимая инфа для работы, но этот файл находится на сетевом диске и в моменте может понадобиться для редактирования, импорта,...
MS Excel Учет двух условий при подсчете количества объектов https://www.cyberforum.ru/ ms-excel/ thread1373055.html
Доброго времени суток! Возник следующий вопрос. нужно посчитать количество объектов, удовлетворяющих нескольким условиям: нужно определить количество человек с одной "4", но при этом у этого же...
MS Excel Построение графиков функций Приветствую форумчане! Помогите пожалуйста решить построить график функции и поверхности в лабораторной работе в Excel, нужны 1 вариант функции и 1 вариант поверхности. Задания во вкладке. Помогите... https://www.cyberforum.ru/ ms-excel/ thread1372956.html
MS Excel Копирование только формул
Добрый день! Помогите, пожалуйста! Часто приходится сталкиваться со след.проблемой: 1. Необходимо скопировать ТОЛЬКО(!) формулы из столбца D в столбец E, пропуская значения. В столбце D на самом...
MS Excel Если на наличие Такой вопрос. Нужно расписать 3 случая: если в 1 ячейке есть текст, то в ячейке где формула, пишем "123", если в другой ячейке, то пишем "321", а если есть хоть что-то в обоих вышеперечисленных... https://www.cyberforum.ru/ ms-excel/ thread1372460.html
MS Excel Подмена дефолтового шаблона в Excel https://www.cyberforum.ru/ ms-excel/ thread1372117.html
Доброго времени суток! есть необходимость подменить дефолтовый шаблон в Excel т.е. при запуске программы или файл - создать - новая книга, или CTRL+N у пользователя открывается не пустой файл, а...
MS Excel Фильтр по дате
Доброго времени суток! Такая задачка: элементарной формулой СУММЕСЛИ ищем (в листе all) и суммируем показатели людей по ФИО (на листе Верификация). На листе all есть столбец Дата ввода (D). Мы...
MS Excel MS Excel 2013: compile error in hedden module Добрый день. Установил новый MS Office 2013 и столкнулся с проблемой "неработоспосбоности" макросов. При запуске появляется следующее сообщение: "Официальные" решения проблемы не помогают.... https://www.cyberforum.ru/ ms-excel/ thread1371758.html MS Excel Функция не обновляет данные из интернета Здравствуйте, помогите пожалуйста, есть функция скачки курса валют с ЦБР (нашел в нете) присвоена ячейки E8, когда я ее только вводил она благополучно притянула данные из сети, но курс уже поменялся,... https://www.cyberforum.ru/ ms-excel/ thread1371740.html
MS Excel Вывод результата расчета именованного диапазона в ячейку другого диапазона
Здравствуйте. Есть такая вот таблица Есть именованный диапазон Data и именованный диапазон Itog Требуется провести расчеты над каждой ячейкой Data и вывести результат расчета в...
MS Excel Составить расписание работы сотрудников https://www.cyberforum.ru/ ms-excel/ thread1371037.html
Здравствуйте! Необходимо составить расписание для сотрудников, которые работают по сменам, по 2 недели. Сложность возникла с написанием формулы ЕСЛИ, у меня там не цифирные, а буквенные...
0 / 0 / 0
Регистрация: 30.01.2015
Сообщений: 16
0

Стянуть котировки золота и нефти - MS Excel - Ответ 7217284

12.02.2015, 03:56. Показов 2354. Ответов 5
Метки (Все метки)

Visual Basic
1
2
3
4
5
6
7
Function Цена_квартиры()
    Dim URL, ZEN, XMLHTTP As Object, XX: URL = "http://www.rosrealt.ru/Rostov_na_Donu/cena"
    Set XMLHTTP = CreateObject("MSXML2.XMLHTTP") 'CreateObject("Microsoft.XMLHTTP")
         With XMLHTTP: .Open "GET", URL, False: .send: End With
     XX = XMLHTTP.responsetext: XX = Split(Split(XMLHTTP.responsetext, "Вторичный рынок")(1), " руб")
    Цена_квартиры = CDbl(Replace(Split(XX(0), ">")(UBound(Split(XX(0), ">"))), " ", ""))
End Function
Тут мне помогли вот с таким вот кодом, который вытягивал цены на квартиры. Так вот хотелось бы нечто подобное для http://www.cbr.ru/ и котировки золота на главной странице. Дело в том, что перехватывать с главной страницы лучше чем запрашивать по дате, ибо нужна только актуальная котировка и отсутвие глюков с датами, которая связана с тем, что нет торгов по выходным. Я понимаю весь код, не соображу как находится нужный текст
Visual Basic
1
(Split(Split(XMLHTTP.responsetext, "Вторичный рынок")(1), " руб"))
Точно так же как и не понимаю этой строки
Visual Basic
1
CDbl(Replace(Split(XX(0), ">")(UBound(Split(XX(0), ">"))), " ", ""))
То есть так понимаю достаточно эти две строчки правильно подкорректировать и цена притянется к переменной. Но вот гуглил материал по данной теме и не нашел алгоритма того как прописываются все эти скобочки, кавычки и и значки или же это делает какая-то хитроумная запись макроса? То есть конечно заранее благодарю за готовое решение, но хотелось бы и научиться самому вытягивать нужную инфу макросами, а не напрягать каждый раз сообщество. То есть мне нуженн алгоритм действий, например 1. сохранить страницу веб как... 2 Открыть ее таким то редактором и посмотреть туда-то 3. на основании этого написать такие то параметры, потому что.... (в разметке html понимаю). Может кому попадался внятный урок как это делать? Потому что длоя меня сейчас это высший пилотаж.... И еще нужно точно так же притянуть нефть brent ну с любого сайта на котором это проще всего сделать на ваше усмотрение. Если напишите мне код то прокомменте пожалуйста что делает какждый из параметров

Вернуться к обсуждению:
Стянуть котировки золота и нефти MS Excel
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.02.2015, 03:56
Готовые ответы и решения:

не получается стянуть картинку
вообщем вот есть сайт theexpendablesmovie.net я хочу рипнуть этот шаблон к себе и не...

Стянуть множество к центру тяжести
Задано множество точек. Стянуть это множество к его центру тяжести, уменьшая расстояние между...

Где стянуть cервер J2EE?
Плиз, где и каким образом можно скачать желательно бесплатный сервер J2EE? Дюже хочется...

Вбить текст и стянуть картинку
Собственно сайт на которой вбиваешь текст и получаешь картинку. Как это можно реализовать на ++...

5
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.02.2015, 03:56

Стянуть информацию с неработающего жесткого на 80Гб.
Please очень помощь нужна. У меня 2 жестких 1 - основной SATA 160 GB, 2 дополнительный - IDE 80 GB...

Стянуть JSON по ссылке с другого сайта
Добрый день В js новенький По вопросу: Нужно организовать ajax запрос к живому сайту который...

Стянуть информацию из таблицы на web-странице
Есть web-страница на ней 2 формы, на второй форме с именем 'Form1' есть 4 таблицы одна под другой....

Можно ли стянуть пакеты с другого дистрибутива?
Здравствуйтя. Хочу на Мандривы 2007 или 2008 поставить некоторые пакеты с Мандривы 2009. Хотел...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.