Makro ile Web Butona Tıklatma

Katılım
31 Temmuz 2021
Mesajlar
1
Excel Vers. ve Dili
2019
Merhaba,

Kod:
basla = Timer: While (Timer - basla) < 0.5: Wend

Set ie = VBA.CreateObject("internetexplorer.application")

 URL = "https://site.com/atama.asp"
 
   With ie
        .Navigate URL
       .Visible = True
      
                Do While .Busy: DoEvents: Loop: Do While Not .readyState = 4: DoEvents: Loop
 basla = Timer: While (Timer - basla) < 0.5: Wend
 
    .document.getElementsbyname("TICKETID")(0).Value = Range("A2")
    .document.getElementsbyname("ATANACAK")(0).Value = Range("B2")
 
 End With
İlgili kod ile excel deki verileri web e aktarabiliyorum. Ancak veri aktarıldıktan sonra 2 işlem geriye kalıyor.

.document.getElementsbyname("TICKETID")(0).Value = Range("A2")
.document.getElementsbyname("ATANACAK")(0).Value = Range("B2")

Bu kodlar çalıştıktan sonra;
x adında butona tıklayacak daha sonra formu tamamlayacak. Yani 2 butona tıklaması gerekiyor.

Kod:
<input type="button" onclick="return AtanacaklaraEkle();" value=">>">
<input class="BUTTON" type="submit" name="Submit" value=" Kaydet ">
Yukarıdaki kodlar butonların kodları. 1. butonda ID, Name özelliği olmaması sebebiyle tıklatamadım. Sanırım Value ">>" özelliğiyle bulup tıklatmak lazım. Çözemedim.

Şimdiden cevaplar için teşekkür ederim.

İyi çalışmalar.
 
Üst