Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Arbeitsmappenregister per VBA ausblenden

Forumthread: Arbeitsmappenregister per VBA ausblenden

Arbeitsmappenregister per VBA ausblenden
22.07.2002 13:01:19
Frank
Weiß jemand den entsprechenden Befehl?
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

Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
zu 1.
22.07.2002 13:36:35
Charly
Hi Frank,
ActiveWindow.DisplayWorkbookTabs = False
Gruss Charly
Möglichkeit zu 2.
22.07.2002 13:46:55
Charly
...du könntest Extras-Optionen deaktivieren

Gruss Charly
Re: Möglichkeit zu 2.
22.07.2002 14:13:00
Frank
Danke für Deine Lösungen.

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

Anzeige
Shortcut: "Strg + Bild auf/ab" oT
22.07.2002 14:15:22
Frank

Re: Möglichkeit zu 2.
22.07.2002 14:46:10
Charly
Hi Frank,
eigentlich schon.
Aber, ist ja nur in dieser Datei.
Ich kenne die Datei ja nicht.
Ist es denn der Zugriff auf Optionen notwendig?
Das mußt du wohl selbst entscheiden.
Es war halt ein Vorschlag(sicher nicht der beste).
Gruss Charly
Checkbox in Dialog sperren!
22.07.2002 15:04:05
Frank
Der Ansatz ist doch nicht schlecht, nur:
Läßt sich das nicht irgendwie begrenzen, das der "Optionen../Ansicht" -Dialog nur mit gesperrter
"Arbeitmappen-Register" - Checkbox eingeladen wird?

Gruß Frank

Anzeige
Frage noch offen !!!
22.07.2002 15:41:18
Charly
...da kann ich dir leider nicht weiterhelfen.
Gruss Charly
Trotzdem Danke! oT
22.07.2002 15:50:25
Frank

Re: Arbeitsmappenregister per VBA ausblenden
23.07.2002 00:17:54
Harald
blendet alle Tabellenblätter ausser sheet1 aus.um sie wieder einzublenden den Wert Visible auf true setzen

Sub ausblenden()
Dim i As Integer
For i = 2 To Application.Worksheets.Count
Sheets(i).Visible = False
Next i
End Sub

Anzeige
Re: Shortcut: "Strg + Bild auf/ab" oT
23.07.2002 06:42:39
Charly
Hi Frank,
folgenden Code in DieseArbeitsmappe

Ich konnte nur unter XP testen.
Gruss Charly
;
Anzeige

Infobox / Tutorial

Arbeitsmappenregister per VBA ausblenden


Schritt-für-Schritt-Anleitung

Um das Arbeitsmappenregister in Excel per VBA auszublenden, kannst du den folgenden Befehl verwenden:

ActiveWindow.DisplayWorkbookTabs = False
  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.
  2. Wähle im Projekt-Explorer die Arbeitsmappe aus, in der du das Register ausblenden möchtest.
  3. Klicke auf "Einfügen" und wähle "Modul".
  4. Füge den obigen Code in das Modul ein.
  5. Schließe den VBA-Editor und kehre zu Excel zurück.
  6. Um das Register wieder einzublenden, kannst du diesen Code verwenden:
ActiveWindow.DisplayWorkbookTabs = True

Häufige Fehler und Lösungen

  • Fehler: Der Befehl funktioniert nicht.

    • Lösung: Stelle sicher, dass du den Code im richtigen Modul eingefügt hast und dass du die Datei als Makro-fähige Arbeitsmappe (xlsm) speicherst.
  • Fehler: Das Arbeitsmappenregister bleibt sichtbar.

    • Lösung: Vergewissere dich, dass der Befehl DisplayWorkbookTabs tatsächlich auf False gesetzt wird und dass keine anderen Makros diesen Wert überschreiben.

Alternative Methoden

Es gibt alternative Ansätze, um das Arbeitsmappenregister auszublenden:

  1. Optionen deaktivieren:

    • Du kannst in Excel unter "Datei" > "Optionen" > "Erweitert" die Sichtbarkeit der Arbeitsmappenregister anpassen.
  2. Shortcut deaktivieren:

    • Um Shortcuts wie 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.


Praktische Beispiele

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

Tipps für Profis

  • Sicherheit: Überlege dir genau, ob du das Arbeitsmappenregister ausblenden möchtest. Berücksichtige die Benutzerfreundlichkeit, da andere Benutzer möglicherweise auf bestimmte Funktionen angewiesen sind.
  • Dokumentation: Kommentiere deinen VBA-Code, damit du und andere Benutzer verstehen, was jeder Teil des Codes tut.
  • Testen: Teste den Code in einer Kopie deiner Datei, um sicherzustellen, dass alles wie gewünscht funktioniert, bevor du es auf die Hauptdatei anwendest.

FAQ: Häufige Fragen

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.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige