Dim HTMLDoc As HTMLDocument
Dim TDelement As Variant
Set HTMLDoc = WebBrowser1.Document
For Each TDelement In HTMLDoc.getElementsByTagName("img")
If TDelement.alt = "Kaydet" Then
TDelement.Click
End If
Next
Referanslara "microsoft Html object library" referansını ekle, butonun tıklandığında olayına aşağıdaki kodu ekle.