Zusaetzliches Menue in Menueleiste
25.11.2005 10:10:46
Otto
Ich habe zwei einfache Makros aufgenommen, die bestimmte Arbeitsblaetter (in diesem Falle b, c und d) ausblenden (bzw. einblenden) und dann die Mappe schuetzen.
Hide Macro
'
Sheets(Array("b", "c", "d")).Select
ActiveWindow.SelectedSheets.Visible = False
ActiveWorkbook.Protect "test", Structure:=True, Windows:=False
End Sub
Sub Unhide()
' Unhide Macro
ActiveWorkbook.Unprotect "test"
Sheets("b").Visible = True
Sheets("c").Visible = True
Sheets("d").Visible = True
End Sub
Da ich diese sehr oft benutze, habe ich mich gefragt, ob es moeglich ist, dass beim oeffnen der Datei in der die Makros sind, ein zusaetzliches Menue in der Menueleiste erstellt wird (z.B. Functions) mit zwei Untermenues Hide und Unhide, die beim Klicken die ensprechende Makros starten.
Kann mir jemand damit helfen?
Vielen Dank im Voraus
Otto