menueleiste+symbolleiste neu nur in anw. sichtbar

hi guten morgen
ich will in ner mappe (ostern.xls) mif folgenden code


Sub symb_aus()
For Each cb In Application.CommandBars
cb.Enabled = False
Next
Application.DisplayFormulaBar = False
End Sub

die symbolleiste und eingabeleiste ausschalten. das geht ok aber wen die mappe speichere excel verlasse und neu oeffne dann ist auch die startdatei ohne leiste
ich will na mappe so modifizieren dass nur selbstgeschriebene menue bzw symbolleisten zu sehen sind.
d h diese sind nur für diese mappe gueltig wie mache ich das aber dass beim neustart von excel die urspruengliche einstellung wieder habe
muss ich da bei woorkbook_open alle ausschalten und die benuzerdefinierten einfuegen und bei woorkbook_beforeClose alles wieder rückgängig machen
denke mir das sollte eventuell mit vorlagen oder so gehn
bin am lesen und suchen aber finde nicht wie das oben beschriebene löse
danke im voraus wenn sich jemand die zeit nimmt und grundlagenerläuterung macht
an vermeintlich simplen sachen hänge oft stunden rum ((
frohe ostern
gruss roland_k

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hi Roland, Hajo
hmm...warum nur immer soo kompliziert???
Roland, JA, Du musst beim, oder vorm Schließen Deiner Datei wieder alles rückgängig machen, was Du auf "globaler" Ebene beim Öffnen Deiner Datei änderst.
Ich schreib jetzt hier nur mal Bsp ohne richtigen Code rein, da Du ja selbst schon weißt, wie SymLeisten erstellt/gelöscht/verborgen werden.
So etwas hattesst Du zumindest geschrieben.


'das Ereignis, welches beim Öffnen jeder Excel-Datei eintritt, wenn denn was drin steht
Private Sub Workbook_Open()
hier wird Deine Symbolleiste erstellt und angezeigt
hier werden auch alle Excel-Leisten, die nicht erscheinen sollen, ausgeblendet
End Sub
'das Ereignis, welches vor dem Schließen jeder Excel-Datei eintritt, wenn denn was drin steht
Private Sub Workbook_BeforeClose(Cancel As Boolean)
hier musst Du Deine Symbolleiste wieder löschen, da sie sonst auch nach dem Schließen Deiner Datei sichtbar bleibt
und hier musst Du alle Excel-Symbolleisten wieder einblenden, da sonst kein Zugriff möglich ist
End Sub
'dieses Ereignis tritt ein, wenn eine oder mehrere weitere Excel-Dateien geöffnet werden
Private Sub Workbook_Deactivate()
hier musst Du Deine Symbolleiste(n) ausblenden, damit sie für andere Exceldateien "unsichtbar" sind
hier musst Du alle anderen Excel-Leisten wieder einblenden, damit in einer anderen Exceldatei das "normale" Arbeiten möglich ist
End Sub
'dieses Ereignis tritt ein, wenn Du von einer anderen, geöffneten Exceldatei zu Deiner "zurückkehrst"
Private Sub Workbook_Activate()
hier musst Du Deine Symbolleiste(n) wieder einblenden, damit sie in Deiner Exceldatei wieder sichtbar ist/sind
hier musst Du wieder alle Excelsymbolleisten ausblenden, auf die in Deiner Exceldatei kein Zugriff möglich sein soll
End Sub

So...das wars.
Konnte ich Dir denn helfen?
Ciao
Thorsten

Beliebteste Forumthreads (12 Monate)

menueleiste+symbolleiste neu nur in anw. sichtbar

14 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

14
Beiträge zum Forumthread

Beiträge zu diesem Forumthread