aynı şeyi xmlhttp yntemleri ile yapsan daha kolay olur. vba nın kendi toollarından değilde xmhttp dll ini indirip system32 nin içine reg ettikten sonra xmlhttp ile sayfa kodunu alıp resim lerle birlikte excell belgesine aktabilirsin. asp de aynı yntemle youtubeden video yolu çekme işini yapıyorduk ama excelde standart makro dışında internetle uğraşmadım. nette baktığım kadarıyla kod rnekleri var. http://stackoverflow.com/questions/551613/vba-check-for-active-internet-connection bağlantı varmı yokmu kontrol etmek içinde aşağıda rnekler var. http://vbnet.mvps. org/index.html?code/network/internetgetconnectedstate.htm inşallah sonuca ulaşırsın:) türk kızlarından sabun yapalım, rus kızları elini yıkasın.:)

Excelin kendi içinde byle bir kısım mevcut yalnız ben bunu, VBA macroyla yapmak istiyorum. Bir çok rneği inceledim genel prensip aynı ama her rnek belirttiği web sitedinde çalışıyor. Aşağıda vereceğim kodlarda olay bitiyor sanırım yardımcı olabilecek olan var mı? MisalSub anemo Dim x As Long Const AdresUrl As String = "http://meteor.gov.tr/tahmin/il-ve-ilceler.aspx?m=kocaeli"x = 1635009Sheets("Sayfa3"). SelectWith ActiveSheet. QueryTables. Add(Connection:= _ "URL;" & AdresUrl, Destination:=Cells(1, 1)) . WebSelectionType = xlAllTables. WebFormatting = xlWebFormattingNone. WebPreFormattedTextToColumns = False. WebConsecutiveDelimitersAsOne = False. WebSingleBlockTextImport = False. WebDisableDateRecognition = False. WebDisableRedirections = False. Refresh BackgroundQuery:=FalseEnd WithSheets("Sayfa3"). SelectEnd SubBu kodlama çalışıyor ama sitenin adını değiştirdiğimizde sıçıyor. şu en sondaki kısımda bir olay dnüyor ama anlamadım. jack daniels 160 yaşında