{quote}{login=fromrom}{date=19.12.2010 11:00}{thema=}{post}Больше ни у кого идей\советов нет?  
Как к примеру с амазона картинки в ексель вставлять или с гугла?{/post}{/quote}  
 
Это легко сделать с помощью контрола Microsoft Internet Transfer Control  
6.0 (wininet.dll). Находим в инете или ставим VB 6.0. Дальше устанавливаем с системную папку. Редактируем реестр(HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\ActiveX Compatibility), так как он может быть заблокирован для использования в Excel.  
Делаем форму, вносим контрол, формируем ссылку (скачиваем страницу и парсим на первый jpg файл) и создаем переменную:  
Dim bytes() As Byte  
Скачиваем в нее картинку:  
bytes() = inetDownload.OpenURL(url, icByteArray)  
Сохраняем:  
Open *** For Binary Access Write As #1  
Put #1, , bytes()  
Потом вставляем в ячейку.  
 
Вариант 2. С помощью Win API и функции URLDownloadToFile.  
Declare Function URLDownloadToFile Lib "urlmon" Alias _  
       "URLDownloadToFileA" (ByVal pCaller As Long, _  
       ByVal szURL As String, _  
       ByVal szFileName As String, _  
       ByVal dwReserved As Long, _  
       ByVal lpfnCB As Long) As Long  
 
Потом: file = URLDownloadToFile(....) в модуле.  
 
Подскажите, с чем именно трудности? На поиск 50 строк уходит часов 20? Не верю. Может у вас с интернетом проблемы? ))