Fehler bei AddIn.Installed = False
01.03.2007 18:29:00
Tobias
ich habe mal wieder ein kleines Problem.
Beim Schließen von Excel soll mein Add-In deinstalliert werden, so dass es beim nächsten Öffnen von Excel nicht automatisch, sondern erst über den Aufruf im Add-In Manager geladen wird.
Hier ist mein Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim oAddIn As AddIn
For Each oAddIn In Application.AddIns
If oAddIn.Installed = True Then
oAddIn.Installed = False
End If
Next
End Sub
Wenn der Code ausgeführt wird, ruft er nach der "oAddIn.Installed = False" Anweisung die Sub wieder von vorne auf und verursacht damit einen Excel Absturz.
Weiß jemand rat?
Herzlichen Dank vorab!!!
Viele Grüße
Tobias