Läßt sich das Einblenden per Optionen/Ansicht verhindern?
Kann man den Shortcut zum wechseln des Arbeitsblattes deaktivieren? Oder ist ein anderer Lösungsansatz sinnvoller?
Besten Dank
Frank
Besten Dank
Frank
Nur: Muß ich keine Gewissensbisse haben wenn ich
in die Intimsphäre des Excel-Users eindringe und ihm den
Zugang zu sämtlichen anderen Optionen abschneide? ; )
Gruß Frank
Gruß Frank
Sub ausblenden()
Dim i As Integer
For i = 2 To Application.Worksheets.Count
Sheets(i).Visible = False
Next i
End Sub
Um das Arbeitsmappenregister in Excel per VBA auszublenden, kannst du den folgenden Befehl verwenden:
ActiveWindow.DisplayWorkbookTabs = False
ALT + F11, um den VBA-Editor zu starten.ActiveWindow.DisplayWorkbookTabs = True
Fehler: Der Befehl funktioniert nicht.
Fehler: Das Arbeitsmappenregister bleibt sichtbar.
DisplayWorkbookTabs tatsächlich auf False gesetzt wird und dass keine anderen Makros diesen Wert überschreiben.Es gibt alternative Ansätze, um das Arbeitsmappenregister auszublenden:
Optionen deaktivieren:
Shortcut deaktivieren:
Strg + Bild auf/ab zu deaktivieren, kannst du das folgende Makro verwenden:Application.OnKey "^({UP})", ""
Application.OnKey "^({DOWN})", ""
Dieses verhindert, dass die Benutzer zwischen den Arbeitsblättern wechseln.
Hier ist ein Beispiel von Harald, das alle Tabellenblätter außer dem ersten ausblendet:
Sub ausblenden()
Dim i As Integer
For i = 2 To Application.Worksheets.Count
Sheets(i).Visible = False
Next i
End Sub
Um die Blätter wieder einzublenden, setze die Sichtbarkeit wie folgt:
Sheets(i).Visible = True
1. Kann ich das Arbeitsmappenregister nur für bestimmte Benutzer ausblenden? Ja, das kannst du, indem du spezifische Bedingungen in deinem VBA-Code einfügst, um die Sichtbarkeit basierend auf dem Benutzernamen anzupassen.
2. Funktioniert das Ausblenden des Registers in allen Excel-Versionen? Die Befehle sollten in den meisten modernen Excel-Versionen funktionieren, allerdings wurde der Code unter Windows XP getestet. Bei anderen Versionen kann es Unterschiede geben.