References MISSING hatası

[Rafet]

References MISSING hatası

Bazen bu hatayı aldığımız oluyor.
Bu tamam DLL, OCX vb... eklentinin olmaması.

Rerefeces ekranında hangi DLL nin kullanıldığını göremiyoruz bunu nasıl göre biliriz.

Burda aklıma bir excel çalışmasında kulanılan eklentilerin listesini nasıl alabilirz sorusuda gelmedi değil.
Forda araştırma yaparken Missing hatası veren objenin tıkını iptal edebileceğimizi ait bir kod gördüm. Bundan esinlenerek aklıma geldi bu.

 

[Haluk]

Mevcut referansları listeleyen kod;

Sub GetReferences()
    Dim refVar As Variant
    Counter = 2
    Cells(1, 1) = "Name"
    Cells(1, 2) = "Type"
    Cells(1, 3) = "BuiltIn"
    Cells(1, 4) = "FullPath"
    Cells(1, 5) = "GUID"
    Cells(1, 6) = "IsBroken"
    Cells(1, 7) = "Major"
    Cells(1, 8) = "Minor"
    For Each refVar In Application.VBE.ActiveVBProject.References
        Cells(Counter, 1) = refVar.Name
        Cells(Counter, 2) = refVar.Type
        Cells(Counter, 3) = refVar.BuiltIn
        Cells(Counter, 4) = refVar.FullPath
        Cells(Counter, 5) = refVar.guid
        Cells(Counter, 6) = refVar.IsBroken
        Cells(Counter, 7) = refVar.Major
        Cells(Counter, 8) = refVar.Minor
        Counter = Counter + 1
    Next
End Sub

 

[Rafet]

Çok teşekkürler.

Allah zihin acıklığı versin.
İşlerinizde kolaylıklar versin.

Daha ne diyim. ..

 

[tamer42]

Merhabalar,

References' da görünen MISSING hatalarını nasıl kaldırabiliriz?

iyi Çalışmalar.