Excel Vba InternetExplorer Run-time error '-2147418113 (8000ffff)': Hatası

Question

İyi günler. Bir k

Vba Kodu--------

Sub Makro1()

    Dim ie As New InternetExplorer

    ie.Visible = True

End Sub

---

Bu makroyu çalıştırmak istediğimde hata alıyorum.

Hata mesajının İçeriği------

Run-time error '-2147418113 (8000ffff)':

Sınıf kaydedilmemiş.

---

Answer 1

İş bilgisayarıma göre Varsayılan değeri sildiğim de otomatik InternetExplorer olarak düzeltti. 

3. resimde yaptığım işlem "WebP File" dizini ile birlikte silmek.

Evdeki bilgisayarımda bilgisayarı yeniden başlatmadığım halde yukarıdaki işlemleri yaptığımda çalışmıştı. İş bilgisayarımda yukarıdaki işlemleri yaptığım halde yeniden başlatıp denediğim de çalıştı. Hangisi bu hataya sebeptir bilmiyorum.

Answer 2

Öneriniz için teşekkür ederim.

Sanırsam

"Tools > Reference > Microsoft Internet Controls"

eklentisinden bahsediyorsunuz. Bu eklenti olmasa

"Compile error: User-defined type not defined"

hatasını verir.

Answer 3

Öneriniz için teşekkür ederim Özgür Bey fakat aynı hatayı tekrar aldım. Ne yazık ki çalışmadı.

Answer 4

Kullanıcılarımıza yardımcı olmak için çeviri hizmeti kullanmaktayız. Lütfen dil bilgisi hatalarını affedin.

Merhaba Özcan

Ben V. Arya, Bağımsız Danışman, bu konuda sizinle çalışmak için. Microsoft Internet Denetimleri'ne başvuru eklerseniz kodunuz çalışır (buna erken bağlama denir)

Araçlar> Başvurular> Microsoft Internet Denetimleri

Aksi takdir -de

Geç bağlama tekniği için Özgür Duranlıoğlu'nun yanıtını kullanın

Answer 5

Merhaba Özcan Doğan,

Internet Explorer direk dim ile tanımlayabileceğiniz bir değişken değildir. Nesne olarak Excel e tanıtmanız gerekir.

Sub Makro1()

Dim IE as Object

Set IE = CreateObject("InternetExplorer.Application")

IE.Visible = true

End Sub

şeklinde tanımlayabilirsiniz.