Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1112to1116
1112to1116
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

mehrere Blätter gleichzeitig einblenden

Forumthread: mehrere Blätter gleichzeitig einblenden

mehrere Blätter gleichzeitig einblenden
Jörg-HH
Guten Abend zusammen
ich kann mehrere Blätter auf einmal ausblenden, indem ich eine Gruppe bilde und dann: Format - Blatt - ausblenden
Wie kann ich denn diese mehreren Blätter auf analoge Weise gleichzeitig wieder einlenden? Was ich auch mache, ich bekomme immer so'n blödes Dialogfeld, in dem ich die Blätter nicht en bloc markieren kann.
Grüße - Jörg
Anzeige

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

Betreff
Benutzer
Anzeige
PS dazu...
06.11.2009 22:33:24
Jörg-HH
dazu gehört thematisch auch diese Frage:
warum läuft das erst Makro, das zweite aber nicht?
Sub a()
Sheets(Array("Tabelle5", "Tabelle4")).Visible = False
Sheets("Tabelle5").Activate
End Sub


Sub b()
Sheets(Array("Tabelle5", "Tabelle4")).Visible = True
Sheets("Tabelle5").Activate
End Sub
Jörg
Anzeige
AW: PS dazu...
06.11.2009 22:43:02
mumpel
Dann versuch es mit dem Index.
...geht nich...
07.11.2009 00:18:20
Jörg-HH
Hi Mumpel,
Index geht nicht - die Blätter liegen nicht alle nebeneinander und haben auch keine aufeinander folgenden Codenamen
Grüße- Jörg
meine Theorie dazu
06.11.2009 22:53:43
Uduuh
Hallo,
letztlich ist VBA ja nur ein Automatisierungswerkzeug.
Von Hand ausblenden kannst du mehrere Sheets. Einblenden aber nur nacheinander. Denn wie willst du mehrere nicht sichtbare Sheets auswählen?
Sub einblenden(arrSH)
Dim sh
For Each sh In arrSH
Sheets(sh).Visible = xlSheetVisible
Next
End Sub


Sub ttt()
einblenden Array("Tabelle3", "Tabelle6")
End Sub
Gruß aus’m Pott
Udo

Anzeige
AW: meine Theorie dazu
06.11.2009 23:25:10
Jörg-HH
Hi Udo
so kurz dein Code auch ist - aber so richtig verstehen kann ich den nicht :-) Wozu dient denn das ttt?
Grüße - Jörg
AW: meine Theorie dazu
06.11.2009 23:29:01
Uduuh
Hallo,
zum Aufruf von einblenden. In ttt wird definiert, welche Sheets eingeblendet werden.
Gruß aus’m Pott
Udo

Anzeige
AW: mehrere Blätter gleichzeitig einblenden
06.11.2009 22:34:55
mumpel
Hallo!
Geht per VBA. Da kannst Du alle Blätter gleichzeitig einblenden.
Gruß, René
nicht alle, nur bestimmte
06.11.2009 22:39:55
Jörg-HH
Hi René,
das is'n bissl viel auf einmal ;-) Alle will ich ja gar nicht. Und wenn ich das mit einem Array eingrenze, läuft's nich
Grüße - Jörg
meine Suche ging knapp dran vorbei :-)
06.11.2009 23:14:02
Jörg-HH
Hi NoNet,
danke für die Links. Ich war im Archiv auf diverse Artikel gestoßen, aber mit einem etwas anderen Suchbegriff - der hat mich dran vorbei geleitet. Ich werd mal basteln...
Grüße - Jörg

Forumthreads zu verwandten Themen

VBA für alle Tabellenblätter
Bernd

Hallo an Alle,
ich bitte um Eure Hilfe. Ich habe ein Makro, das mir in einem Zellbereich bei einem Doppelklick ein Haken oder ein x schreibt. Dies funktioniert in dem Tabellenblatt, in dem das Makro gespeichert ist. Ich möchte aber die Dateien nicht in .xslm sondern in .xlsx, also ohne Makr...
22.06.2014 22:03:57
Thread-ID: 1366938
4 Beiträge
VBA alle Windows aus-/einblenden
Thomas

Hallo zusammen,
die beiden simplen Makros sollen alle Fenster aus- oder einblenden.
_________________________________ Public Sub EinblendenWindows() Dim i As Integer For i = 1 To Windows.Count Windows(i).Visible = True Next End Sub
_________________________________ Public Sub Aus...
27.10.2016 17:07:37
Thread-ID: 1521970
3 Beiträge
VBA-Skript auf alle Tabellenblätter beziehen
Denis

Hallo liebe Community,
ich hoffe, ihr könnt mir bei folgendem Problem helfen.
Ich habe Excel-Dateien, in denen ein über VBA programmiertes Makro geschrieben wurde (nicht von mir).
Es geht um einen Speiseplan, der aus unserem WaWi-System exportiert wird. Wenn die Datei geöffnet wird,...
24.03.2017 15:33:04
Thread-ID: 1549344
3 Beiträge
Überstunden mit vba zählen alle Tabellenblätter
Jannick

Hallo Liebe Excel Profis,
Zu folgendem Projekt fehlt mir leider etwas die Erfahrung.
Ich konnte mir schon viel zusammenbasteln und auch schon Erfolge in div. Projekten verzeichnen. Allerdings komme ich hier nun nicht mehr weiter.
Hier meine Bsp. Datei
https://www.herber.de/bbs/u...
30.05.2019 12:58:57
Thread-ID: 1695409
6 Beiträge
Doppelte Namen in 2 Tabellenblättern anzeigen
Sven

Guten Tag,
ich habe nun schon ewig im Web gesucht, jedoch keine passende Lösung gefunden.
Ich habe eine Tabelle Namens "Terminer" mit 2 Tabellenblättern.
Das 1. Tabellenblatt heißt Transporter, dass 2. Termine.
Im 1. Tabellenblatt befindet sich eine Spalte Nachname (Spalte B)...
14.08.2019 11:02:00
Thread-ID: 1707600
9 Beiträge
Tabelle1 und Tabelle2 nebeneinander anzeigen
speednetz

Hallo
Kann mir jemand bei dem folgenden Problem helfen.
Ich habe mit dem Makrorecorder einen Code erstellt, der mir Tabelle1 und Tabelle2 neben einander anzeigt. Dieser läuft auch einband frei.
Dann speichere ich die Datei ( Orginal.xlsm) mit neuem Namen Datei (Mappe1.xlsm) ab.
...
23.10.2019 12:29:18
Thread-ID: 1719225
7 Beiträge
VBA Tabellenblätter Passwort einblenden
Meli
Hallo zusammen,
ich habe von VBA leider keine Ahnung, nur soviel, dass ich mich heute mal schon den ganzen Tag damit beschäftigt habe und ein bisschen Verständnis dafür aufgebaut habe. Hintergrund dafür ist, dass ich bisher eine Datei habe, in welche ich Daten eintrage, die dann wiederum in ca....
23.11.2021 14:43:10
Thread-ID: 1858155
8 Beiträge
VBA in allen Tabellenblätter
Jan
Guten Morgen,
ich habe diesen Code und möchte das er in ALLE Tabellenblätter "greift". Ich habe ihn in Arbeitsmappe getan aber leider geht es nicht:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 1 Then
Target = Environ("Username"...
08.03.2023 08:58:22
Thread-ID: 1923206
3 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Mehrere Blätter gleichzeitig einblenden in Excel

Schritt-für-Schritt-Anleitung

Um mehrere Blätter gleichzeitig in Excel einzublenden, kannst Du folgende Schritte befolgen:

  1. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Neues Modul erstellen: Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)", wähle Einfügen und dann Modul.

  3. Code einfügen: Kopiere den folgenden VBA-Code und füge ihn in das Modul ein:

    Sub einblenden(arrSH)
    Dim sh
    For Each sh In arrSH
        Sheets(sh).Visible = xlSheetVisible
    Next
End Sub

Sub ttt()
    einblenden Array("Tabelle3", "Tabelle6") ' Hier die gewünschten Blätter anpassen
End Sub

  4. Makro ausführen: Schließe den VBA-Editor und gehe zurück zu Excel. Drücke ALT + F8, wähle ttt aus und klicke auf Ausführen.

Jetzt sollten die angegebenen Tabellenblätter sichtbar sein. Diese Methode ermöglicht es Dir, mehrere Tabellenblätter gleichzeitig einzublenden.

Häufige Fehler und Lösungen

  • Fehler: "Das Blatt konnte nicht gefunden werden"
    Lösung: Stelle sicher, dass die Namen der Blätter korrekt sind und existieren.

  • Fehler: Dialogfeld zur Auswahl der Blätter erscheint
    Lösung: Wenn Du die Blätter manuell einblenden möchtest, wähle sie vorher aus (mit gedrückter Strg-Taste). Eine VBA-Lösung ist in diesem Fall effektiver.

Alternative Methoden

Wenn Du keine VBA-Lösungen verwenden möchtest, kannst Du auch die folgenden Methoden ausprobieren:

  • Manuelles Einblenden: Klicke mit der rechten Maustaste auf die Blätter, die Du einblenden möchtest, und wähle Einblenden. Dies funktioniert jedoch nur für ein Blatt gleichzeitig.

  • Alle Blätter einblenden: Um alle Tabellenblätter einblenden, kannst Du folgendes machen:

    1. Klicke mit der rechten Maustaste auf eines der Blätter.
    2. Wähle Alle Blätter einblenden.

Praktische Beispiele

  • Beispiel 1: Um die Blätter "Tabelle1" und "Tabelle2" gleichzeitig einzublenden, passe den Code im ttt-Sub wie folgt an:

    Sub ttt()
    einblenden Array("Tabelle1", "Tabelle2")
End Sub

  • Beispiel 2: Wenn Du zwei Tabellenblätter nebeneinander anzeigen möchtest, kannst Du die Ansicht in Excel anpassen:

    1. Wähle die beiden Blätter aus.
    2. Klicke auf Ansicht > Nebeneinander anzeigen.

Tipps für Profis

  • Nutze die Tastenkombinationen in Excel, um schneller zu navigieren. CTRL + Page Up oder CTRL + Page Down hilft Dir, zwischen Blättern zu wechseln.
  • Verwende VBA-Module, um häufig genutzte Scripts zu speichern. So kannst Du sie schnell aufrufen und Zeit sparen.
  • Wenn Du oft mit vielen Blättern arbeitest, erstelle eine Übersicht auf einem Hauptblatt, von dem aus Du die anderen Blätter direkt verlinken kannst.

FAQ: Häufige Fragen

1. Wie kann ich alle Arbeitsblätter in Excel gleichzeitig einblenden?
Du kannst alle Blätter mit dem Kontextmenü einblenden. Rechtsklicke auf ein Blatt und wähle Alle Blätter einblenden.

2. Funktioniert das Einblenden von Blättern in allen Excel-Versionen?
Ja, die beschriebenen Methoden funktionieren in den meisten aktuellen Excel-Versionen, insbesondere Excel 2016 und neuer.

3. Was kann ich tun, wenn VBA nicht verfügbar ist?
Nutze die manuelle Methode oder suche nach Add-Ins, die diese Funktionalität unterstützen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige