Also bei mir wird unter dem Ribbon "addins" folgendes angelegt:
Problem:
Beim ersten mal läuft durch, beim zweiten Mal (logischerweise) in einen Laufzeitfehler.
Warum? Weil bereits angelegt.
Deshalb vorher prüfen, ob bereits angelegt, oder davor rauslöschen.
Ob angelegt, kannst Du so anschauen:
Dim o
For Each o In Application.CommandBars
Debug.Print o.Name
Next
folglich so löschen:
Application.CommandBars("Kapitel2").Delete
|