Add-Ins entfernen

Hallo,

ich möchte auf einem Windows Server 2008 mit Microsoft Office 2007 Terminal Edition den Reiter "Add-Ins" entfernen. Die Icons in diesem "Reiter" sind funktionslos. Nur hat das Programm "vergessen" sich aus Office herauszulöschen. Hinter dem folgenden Link findet ihr einen Screenshot, der die Situation verdeutlichen sollte. http://img408.imageshack.us/img408/2839/wordaddinproblemch9.png

Danke

 

Hallo!

Wenn Du weisst, wie die Symbolleiste heisst, kannst Du sie per Makro löschen.

Code:

Sub SymbLöschen()
Application.CommandBars("NameDerSymbolleiste").Delete
End Sub

Gruß, Rene

 

Leide kenne ich den Namen der Symbolleiste nicht. Ist es nicht möglich die Leiste beispielsweise über die Registry auszuschalten?

 

Suche die Excel12.xlb und lösche sie. Dann sollte auch die Symbolleiste verschwinden und dass AddIn-Tab wird nicht mehr angezeigt.

 

Mit "Suche... sie" gehe ich von einer Datei aus. Allerdings kann ich (bzw. die Suchroutine) keine Excel12.xlb finden.

 

Wo hast Du die Datei gesucht? Hast Du auch nach versteckten und Systemdateien gesucht? Wenn Du in Excel 2007 eine benutzerdefinierte Symbolleiste aus einer älteren Excelversion nutzt, dann muss auch eine Excel12.xlb vorhanden sein. In dieser werden die Einstellungen der benutzerdefinierten Symbllloeisten aus älteren Ecxcelversionen gespeichert.

 

Ich habe sie gefunden, gelöscht, Excel gestartet (nicht vergessen, es ist ein Office-Problem, betroffen sind alle Office Programme) und dann gesehen, dass er sie neu geschrieben hat. Der Fehler ist aber weiterhin vorhanden.

 

Kann es sein, dass das zugehörige Programm oder Reste davon noch auf dem System vorhanden sind? Woher stammt das "Ursprungsprogramm"? Wenn es ein externes AddIn (Comm-AddIn) ist, musst Du möglicherweise das zugehörige Programm noch richtig deinstallieren. Ein Registry-Cleaner könnte möglicherweise auch helfen (kann ich aber nicht proplemlos empfehlen). Schau auch mal die AddIn-Liste durch und deaktiviere Eines nach dem Anderen, bis die Symbolleiste verschwindet.

 

Das Problem ist, dass sich das Programm (Mindmanager von Mindjet) einfach da mit eingeklinkt hat. Ich habe bei der Installation explizit gesagt, dass er keine Add-Ins installieren soll, er tat es aber trotzdem. Ich habe eben noch weitere Add-Ins in Publisher und PowerPoint entdeckt. Habe diese über den Add-In Manager entfernt. Das Programm an sich (Mindmanager) soll drauf bleiben. Es sind nur die Add-Ins, die Probleme machen und zum Beispiel Abstürze in Outlook verursachen.
PS: Die Leiste ist nur in Word zu sehen.

 

Hi Stven,

schau mal in den Startordner der Application, ob sich dort das Add-In installiert hat und somit beim Starten immer mit aufgerufen wird.

Bis später,
Karin

 

Hi Hascheff,

naja, ich dachte, doppelt hält besser

 

Also im "Startordner" finde ich nichts. Als Startordner habe ich jetzt das Startmenü verstanden. Ich habe auch im Programmordner nachgesehen -> Nichts von Add-In, Add-On, etc zu finden.

 

Sie meint nicht den Startordner, sondern den Ordner STARTUP (Word-Autostartordner), normalerweise zu finden in C:\Programme\Microsoft Office\Office12 oder im persönlichen Verzeichnis.

 

Ok, ich habe ihn gefunden, allerdings ist auch dieser Ordner leer...

 

Hi Steven,

da du nicht weißt wie die Symbolleiste heißt, kannst du sie vielleicht mit diesem Code aufgelistet bekommen und sie dann möglicherweise mit Renè's Code entfernen

Code:

Sub symbolleisten()
    Dim pos
    bars (pos)
End Sub

Public Function bars(pos As Long) As Long
'   Code von Ka Prucha, MS-NewsGroup
    Dim inZeile As Integer
    inZeile = 2
    For Each cb In CommandBars
        If cb.Visible Then
            Cells(inZeile, 1) = cb.Name
            inZeile = inZeile + 1
        End If
    Next cb
End Function

 

Irgendwas stimmt mit dem Code nicht. Ich finde den Fehler jedenfalls nicht. Sry, hab noch nicht allzulange Anwendungsentwicklung... :-P
PS: Folgender Fehler:

-> Fehler beim Kompilieren: Sub oder Function nicht definiert.

=> Fehlermarker: Public Function bars(pos As Long) As Long

Der Code sieht nun wie folgt aus:

-----------------------------------------------------------------------
Sub DelBar()
'
' DelBar Makro
'
'
Dim pos
bars (pos)


End Sub
Public Function bars(pos As Long) As Long
' Code von Ka Prucha, MS-NewsGroup
Dim inZeile As Integer
inZeile = 2
For Each cb In CommandBars
If cb.Visible Then
Cells(inZeile, 1) = cb.Name
inZeile = inZeile + 1
End If
Next cb
End Function
-----------------------------------------------------------------------

 

Hi Steven,

bei mir läuft der Code fehlerlos. Schau mal im VBA-Editor unter Extras -> Verweise nach, welche bei dir aktiviert sind. Bei mir sind es:

- Visual Basic For Applications
- Microsoft Excel 12.0 Object Library
- OLE Automation
- Microsoft Office 12.0 Object Library

 

Ich mache gerade ein paar Arbeitsspeichertests am Server, das heißt ich kann im Moment nicht das Betriebssystem starten. Ich melde mich morgen. Danke für deine Hilfe :- )

 

Also, ich habe eben überprüft welche Haken gesetzt sind und es sind die allerselben gesetzt, wie bei dir...