Formdaki webbrowseri kaldır, 

Giriş yap butonunun tıklandığında olayına yazılı kodları aşağıdaki ile değiştir.

Dim Tarayici As Object

Set Tarayici = CreateObject("internetexplorer.application")

  Tarayici.navigate "https://ebildirge.sgk.gov.tr/WPEB/amp/loginldap"

  Tarayici.Visible = True

While Tarayici.busy

   DoEvents

Wend

Tarayici.Document.all("j_username").Value = mtn_kullaniciadi.Value

Tarayici.Document.all("isyeri_kod").Value = Me.mtn_isyeri_kod.Value

Tarayici.Document.all("j_password").Value = Me.mtn_sistemsifresi.Value

Tarayici.Document.all("isyeri_sifre").Value = Me.mtn_isyerisifresi.Value

While Tarayici.busy

   DoEvents

Wend

Set Tarayici = Nothing

Butonu tıkladığında tarayıcı popup olarak açılır, doğrulama kodu hariç tüm alanlara veri aktarılır. Siz doğrulama kodunu yazıp tarayıcıdaki giriş butonuna tıklayıp sisteme giriş yapabilirsiniz,