Excel4Makro Show.Toolbar(""Ribbon""...
07.01.2013 15:20:17
Reinhard
das wichtigste zuerst, schönes gesundes neues Jahr für alle *wünsch*
Mit dem nachstehenden Code in DieseArbeitsmappe einer Mappe
wurde beim Öffnen der Befehl
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
ausgeführt.
Dann habe ich mit Strg+o und Strg+n alte Mappe geöffnet bzw. neu erstellt.
Da hat noch alles funktioniert, d.h. wie geplant ist beim Mappenwechsel
nur in der einen Mappe "Ribbon" ausgeblendet.
Jetzt, nach Hin- und Hertesten habe ich den Zustand, "Ribbon ist weg und ich kriege
es nicht mehr eingeblendet:-)
Was soll ich tun?
Excel beenden, neu starten, mit Strg+n neue Mappe anlegen und da in einem
Modul diesen Code ausführen:
Sub tt()
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
End Sub
blendete leider nichts wieder ein.
Danke ^ Gruß
Reinhard
Private Sub Workbook_Activate()
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
End Sub
Private Sub Workbook_Deactivate()
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
End Sub
Private Sub Workbook_Open()
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
End Sub