Загрузка рисунка

[Ilya9999]

Подскажите возможно ли сделать, чтобы в Excel каким-либо образом загружалось изображение со стороннего ресурса? т.е. на определённом листе при обновлении обновлялось и изображение ссылка на изображение:
http://micex.ru/marketdata/analysis/...od=-1M&lang=ru
страница с рисунком: http://micex.ru/markets/stock/today
премного благодарен заранее...если это возможно в виде небольшого плагина на С++ например, готов отблагодарить...

[EducatedFool]

если это возможно в виде небольшого плагина на С++ например

С++ в данном случае не нужен.
В Excel есть макросы, которые легко скачают рисунок, и поместят его на лист в нужное место. (а потом ещё и обновлять будут)

т.е. на определённом листе при обновлении

Где файл с этим листом? Без примера файла не получится - если даже мы предложим вам готовое решение, вы просто не сможете потом адаптировать это решение под свой файл.

Что за обновление? Как и когда оно происходит?
Откуда берутся новые данные? (с терминала, с сайта, вручную вбиваются)
Как часто обновляется рисунок на сайте?

Нафига вообще скачивать этот рисунок?
Если на листе Excel есть все необходимые данные, проще построить диаграмму, выглядящую в точности так же, как и на рисунке с сайта.
Тогда и обновлять ничего не надо - диаграмма сама обновится.

[motorway]

Попробуйте так (это код на VBA):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Pictures.Insert( _
        "http://micex.ru/marketdata/analysis/chart_preview?secid=MICEXINDEXCF&boardid=SNDX&market=index&trade_engine=stock&template=micexpreview&timeline=2010.05.25%2000%3A00%3A00-2010.05.26%2023%3A59%3A59&interval=10&period=-1d&ltime=1274900100000&lang=ru" _
        ).Select
ActiveSheet.Pictures.Insert( _
        "http://upload.wikimedia.org/wikipedia/ru/thumb/d/d2/Winnie-the-Pooh-1.jpg/200px-Winnie-the-Pooh-1.jpg" _
        ).Select
        
        
End Sub

[Ilya9999]

Прошу прощения, что не всё указал. Изображение находится на сайте и данных по нему там в открытом виде не имеется, обновляется оно примерно 3 раза в день, вследствие чего немного видоизменяется и ссылка на него. Данных на рабочем листе в Экселе не имеется, график нужен для аналитического сравнения.
Спасибо за предложенный вариант, мне кажется он подходит...немного поизменял ссылку на изображение, точнее параметры запроса, получается, что можно её немного сократить и не особо мучаться с параметром TIMELINE, то бишь датой, т.к. при вводе туда например конца настоящего года, с сайта выгружается график на последнюю имеющуюся дату,что есть само по себе хорошо...)) но хотелось бы конечно привязать это к настоящему времени, т.е. чтобы в запросе менялась даты, дабы в конце года не менять внутренности макроса...

видоизменённая ссылка: http://micex.ru/marketdata/analysis/...od=-1M&lang=ru

подрезал дату и время

можно ли в этом коде

tiveSheet.Pictures.Insert( _
        "http://micex.ru/marketdata/analysis/chart_preview?secid=MICEXMBITR&boardid=SNDX&market=index&trade_engine=stock&template=micexpreview&timeline=2010.04.14-2010.05.27&interval=24&period=-1M&lang=ru" _
        ).Select

заменить дату и период на переменные, которые будет вводить пользователь для получения графика...?

[motorway]

Если в ячейку A1 на листе вставлять диапазон в виде 2010.03.14-2010.06.25, а код сделать таким

ActiveSheet.Pictures.Insert( _
        "http://micex.ru/marketdata/analysis/chart_preview?secid=MICEXINDEXCF&boardid=SNDX&market=index&trade_engine=stock&template=micexpreview&timeline=" & Range("A1").Value & "&interval=24&period=-1M&lang=ru" _
        ).Select

,
то должно работать. Правда, после выбора дат из февраля, например, я не заметил, чтобы график до туда растягивался. Но это уже зависит от сайта. Либо там надо как-то вводить по-другому даты

[Ilya9999]

Я обратил внимание, что первую дату можно не трогать...можно изменить период "отскока назад" начальной точки графика...параметр period, стоит -1М т.е. на один месяц...также можно открутить на 2, 3 месяца, но к сожалению не больше...видимо данные хранятся за последние 3 месяца...сейчас попробую изменить конечную дату по вашему примеру.

[motorway]

Да, у меня тоже получилось только на 3. А на 2, кстати, нет.
Если хотите менять именно период, то можете писать его тоже в ячейке, а тогда код будет такой:

ActiveSheet.Pictures.Insert( _
        "http://micex.ru/marketdata/analysis/chart_preview?secid=MICEXINDEXCF&boardid=SNDX&market=index&trade_engine=stock&template=micexpreview&interval=24&period=" & Range("A1").Value & "&lang=ru" _
        ).Select

Естественно, здесь можно добавить timeline, я его просто убрал сейчас

[Ilya9999]

да, про период уже тоже посмотрел...)

пытаюсь сделать замену только одной даты...

ActiveSheet.Pictures.Insert( _
        "http://micex.ru/marketdata/analysis/chart_preview?secid=MICEXINDEXCF&boardid=SNDX&market=index&trade_engine=stock&template=micexpreview&timeline=2010.04.14-" & Range("G4").Value & "&interval=24&period=-3M&lang=ru" _
        ).Select

получается если только вводить дату в формате как в запросе,только с кавычкой в начале,чтобы Эксель воспринимал в нужном виде... т.е. так:" '2010.05.26 "

[motorway]

Можете вводить и в обычном виде, а затем просто парсить свойство Value. Например, получать с помощью Split части между точками и их переставлять и вставлять в запрос
Пример:

x = Range("G14").Value
y = Split(x, ".")
Range("A2").Value = y(2) & "." & y(1) & "." & y(0)
MsgBox Range("A2").Value

[Ilya9999]

вот это круто )) спасибо большое...аж приятно тыкать стало...