Bir Makroyu butona atayıp çalıştıramadım.

[tufan03]

Const URL As String = "http://app.ssk.gov.tr/sicilsorgulama/hosgeldiniz.do"
Sub SGKBilgiSorgula()
Dim Data(1 To 5) As String
Dim DataShow(1 To 8) As String

ile başlayan bir makroyu (çok uzun olduğu için tamamını yazmadım) Userform üzerindeki bir butonu atayıp çalıştırmak istedim. Makro normalde çalışıyor Commandbutona atadığımda hata veriyor çalışmıyor.

 

[Ayhan Ercan]

Private Sub CommandButton_Click()
Call SGKBilgiSorgula
End Sub

 

[S.Yiğit]

ayhan bey kusura bakmasın.ben girdiğimde hiçbir msj.yoktu.sanırım ikimizin ki aynı anda çıktı.üstadlar varken bize laf düşmez.

Selamlar..

Sn swimmer, Yanlış düşünüyorsunuz.. Burda üstad olsun üye olsun herkesin bilgisine paylaşımına ihtiyacımız var ve bu forumunda amacı bu. Eminimki Ayhan hocam kusura bakmaz hatta hoşuna bile gider..
Bir konuda bilginiz varsa bunu paylaşmaktan çekinmeyin..
Tşkler..

 

[Ayhan Ercan]

Selamlar..

Sn swimmer, Yanlış düşünüyorsunuz.. Burda üstad olsun üye olsun herkesin bilgisine paylaşımına ihtiyacımız var ve bu forumunda amacı bu. Eminimki Ayhan hocam kusura bakmaz hatta hoşuna bile gider..
Bir konuda bilginiz varsa bunu paylaşmaktan çekinmeyin..
Tşkler..

k:: k:: k:: k::

 

[tufan03]

Teşekkür ederim arkadaşlar sorun çözüldü.