Çözüldü Koşula göre webden veri alma

[burakgunes]

Merhaba bir vba koduna ihtiyacım var

Bu bağlantı ziyaretçiler için gizlenmiştir. Görmek için lütfen giriş yapın veya üye olun.

Linkteki sayfa yüklenirse makro 1 i çalıltıracak sayfa yüklenmez is makro 2 çalışacak

Web den json ile veri çekiyorum kendi excellime fakat server da dış ip iç ip sorunu olduğu için ayrı makroları tek buton ile çalıştırmak istiyorum teşekkürler

 

[Patron]

Çok emin değilim ama deneyin.
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[aeGNoR]

Userform üzerinde webbrowser ile yapılmış bir örnek hazırladım.
Kontrol eder misiniz?

 

[burakgunes]

Çok emin değilim ama deneyin.
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Merhaba maalesef çalışmadı Sayfa yüklensede yüklenmesede ilk makroyu çalıştırıyor

 

[burakgunes]

Userform üzerinde webbrowser ile yapılmış bir örnek hazırladım.
Kontrol eder misiniz?

Merhaba örneğinizi inceledim fakat benim istediğim şu şekilde "

Bu bağlantı ziyaretçiler için gizlenmiştir. Görmek için lütfen giriş yapın veya üye olun.

" benim iç ip adresim eğer bu sayfa yükleniyorsa makro bir otomatik çalışsın eğer yüklenmiyorsa makro iki çalışsın Siz dış ip olduğunuziçin iilk verdiğim ip adresi her türlü çalışıyor zaten bu p adresi üzerinden daha net bir sonuç elde edebiliriz belki

 

[aeGNoR]

Merhaba örneğinizi inceledim fakat benim istediğim şu şekilde "

Bu bağlantı ziyaretçiler için gizlenmiştir. Görmek için lütfen giriş yapın veya üye olun.

" benim iç ip adresim eğer bu sayfa yükleniyorsa makro bir otomatik çalışsın eğer yüklenmiyorsa makro iki çalışsın Siz dış ip olduğunuziçin iilk verdiğim ip adresi her türlü çalışıyor zaten bu p adresi üzerinden daha net bir sonuç elde edebiliriz belki

Yüklediğim örnek üzerinde değişiklik yaptım dener misiniz?

Değişiklik ise şöyle;
webbrowser1 nesnesi adresi yüklemeye başlıyor. Belirli bir süre do loop ile döngüye giriyor, bu döngü içerisinde webbrowser1 nesnesinin yüklemesinin tamamlanıp tamamlanmadığını kontrol ediyor. Bu süre zarfında yükleme bitmezse makro2 çalışıyor biterse makro1 çalışıyor.

Not: Burada şöyle bir sıkıntı var. Kendi bilgisayarınızda da yükleme uzun sürebilir bu durumda makro2 çalışır. Ayrıca webbrowser adrese sorgulama yaptıktan belli bir süre sonra sayfa yüklenmiş olsa da yüklenmemiş olsada "readystate.complete" olarak tanımladığı için belirlediği süreden önce complete olursa hangi ip adresinde olursa olsun yine makro1 çalışır.

 

[aeGNoR]

Ayrıca yerel ip adresinin tespiti için bkz:
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Düzeltme: Kod bana ait değil. Daha önce kod arşivine aldığım bir kodmuş, kaynağı tam olarak neresiydi hatırlamıyorum.