Fehlerhafter Verweis löschen erzeugt fehler!
09.11.2005 12:11:17
Balz
Ich verwende eine eigene Bibliothek und jedesmal wenn ich diese neu kompiliere muss ich den verweis neu setzen, da der alte fehlerhaft ist. Deshalb möchte ich über VBA die Fehlerhaften Verweise entfernen.
Leider funktioniert das bis jetzt noch nicht und ich kann mir auch nicht erklären weshalb. Ich habe schon diverse scripts ausprobiert und diese auch auf verschidenen rechnern. Aller dings immer mit derselben Office version.
Ich verwende Office 2003, Excel 2003 (11.6560.6558) SP 2. Vielleicht ist das ja wichtig.
Das ist mein Code zum entfernen der "defekten" verweise:
For i = 1 To Application.VBE.ActiveVBProject.References.Count
If Application.VBE.ActiveVBProject.References.Item(i).IsBroken Then
Call Application.VBE.ActiveVBProject.References.Remove
(Application.VBE.ActiveVBProject.References.Item(i))
End If
Next i
Es wird folgender Fehler erzeugt:
Laufzeitfehler '-2147319779 (80029801d)':
Automatisierungsfehler
Bibliothek nicht registriert.
Bin für jede hilfe dankbar. Wenn nötig werde ich das Workbook auch hochladen.
gruss Balz