george_a
02-16-2010, 02:38 AM
Hi,
I have an annoying addin that's appearing in the project explorer window and not in Extras-Addins list. I tried disabling it with the following code:
Private Sub Workbook_Open()
Dim initialPos As Integer
Dim FinalPos As Integer
Dim I As Integer
initialPos = 1
FinalPos = AddIns.Count
For I = initialPos To FinalPos
If AddIns(I).Name = "XSFormatCleaner.xla" _
And AddIns(I).Installed = True Then
AddIns(I).Installed = False
MsgBox ("Addin running, now stopped!")
Exit For
End If
Next
End Sub
The annoying thing is that it's not in the addin list (checked with debugging and adding a watch on AddIns), yet it's behaving like an addin, running its code every time something's happening in the Excels that I opened.
Any other idea on how I can suppress this addin, so that once my workbook is opened, its code will never run until I close it?
Best regards,
George
I have an annoying addin that's appearing in the project explorer window and not in Extras-Addins list. I tried disabling it with the following code:
Private Sub Workbook_Open()
Dim initialPos As Integer
Dim FinalPos As Integer
Dim I As Integer
initialPos = 1
FinalPos = AddIns.Count
For I = initialPos To FinalPos
If AddIns(I).Name = "XSFormatCleaner.xla" _
And AddIns(I).Installed = True Then
AddIns(I).Installed = False
MsgBox ("Addin running, now stopped!")
Exit For
End If
Next
End Sub
The annoying thing is that it's not in the addin list (checked with debugging and adding a watch on AddIns), yet it's behaving like an addin, running its code every time something's happening in the Excels that I opened.
Any other idea on how I can suppress this addin, so that once my workbook is opened, its code will never run until I close it?
Best regards,
George