Soru Web sayfası yüklenince devam et komutu

[musto444]

Merhaba arkadaşlar. Excel verilerini bir web sayfasına aktarmaya çalışıyorum. Ama verilerin sıra ile aktarılması gerekiyor. Örneğin A verisini aktardım. Web sayfasında bu A verisine göre yeni bir liste oluşuyor. Bu listeden de B yi seçtirmek istiyorum. Fakat bu işlemi yaparken şu şekilde bir sorunla karşılaşıyorum. A yı seçtikten sonra web sitesi yoğunsa diğer liste geç yükleniyor. Bu durumda hata alıyorum. Aradaki bekleme süresini arttırıyorum fakat bu seferde yükleme hızlı olunca boşu boşuna bekliyorum.

Bu iki işlem arasına web sayfası tamamen yüklenince devam et şeklinde nasıl bir komut yazabilirim. Şimdiden teşekkür ederim.

 

[askm]

A yüklenince B verisine baktır orada değer yoksa döngü ile bekleme ekle eğer varsa döngüden çıkart. Ya da goto ile devam ettir.

 

[musto444]

A yüklenince B verisine baktır orada değer yoksa döngü ile bekleme ekle eğer varsa döngüden çıkart. Ya da goto ile devam ettir.

VBA bilgim sıfır sayılır. Kodları yazdım. Zahmet olmazsa yardımcı olabilir misiniz?

'Saat Gir
    site.FindElementByXPath("/html/body/div[1]/div[1]/div/div/div[1]/div/div[3]/div/div/div[2]/div/div/div[1]/div[1]/div[2]/div[4]/div/div[2]/select", 2000).SendKeys Sheets("Verial").Cells(dersler, 4)
    'Açıklama Gir
    site.FindElementByXPath("/html/body/div[1]/div[1]/div/div/div[1]/div/div[3]/div/div/div[2]/div/div/div[1]/div[1]/div[2]/div[5]/input", 2000).SendKeys Sheets("Verial").Cells(dersler, 5)
   
    BU KISIMA BEKLEMEK İÇİN KOD YAZMALIYIM
   
    'Ders Giriyoruz.
    site.FindElementByXPath("/html/body/div[1]/div[1]/div/div/div[1]/div/div[3]/div/div/div[2]/div/div/div[1]/div[2]/div[2]/div[1]/div/div[1]/div[2]/div[1]/span", 2000).Click
    site.FindElementByXPath("/html/body/div[1]/div[1]/div/div/div[1]/div/div[3]/div/div/div[2]/div/div/div[1]/div[2]/div[2]/div[1]/div/div[1]/div[2]/input[1]", 2000).SendKeys Sheets("Verial").Cells(dersler, 9)
    site.SendKeys site.keys.Enter