Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 10:55:14
Zeilen sortieren
23.04.2024 10:23:52
Tabelle 90° drehen + Filteroptionen
23.04.2024 10:11:03
Dateiname plus Wenn vorhanden dann "(1)" anhängen.
23.04.2024 09:45:43
mehrere Bedingungen verknüpfen und mehr
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
912to916
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
912to916
912to916
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblatt

Tabellenblatt
08.10.2007 14:34:13
Jan
Hallo
Man kann mehrere Tabellenblätter markieren und mit dem Befehle Format, Blatt, ausblenden.
Einfügen kann ich aber nur die Blätter wieder einzeln.
Gibt es dazu einen Trick der mehrere Blätter einblendet?
Zeite Frage: Kann ich die ausgeblendeten Blätter gegen wiedereinblenden schützen ?
Wenn ja wie geht das?
Gruß Jan

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt
08.10.2007 14:41:19
Original
Hi,
mehrere einblenden nur mit VBA.
Einblenden verhindern entweder Mappenschutz oder im Editor auf
xlVeryHidden stellen, Projekt mit Passwort schützen, dann kann
nur mit VBA eingeblendet werden.
mfg Kurt

AW: Tabellenblatt
08.10.2007 14:42:00
Worti
Hallo Jan,
ich glaub, einblenden geht nur einzeln. Schutz gegen das Wiedereinblenden geht mit
Menü Extras - Schutz - Arbeitsmappe - Aufbau - event. Passwort
Gruß Worti

Das geht beides per VBA
08.10.2007 14:58:03
NoNet
Hallo Jan,
per VBA geht beides (zumindest bedingt, da nacheinander) :
- Mehrere Blätter einblenden :
Sub MehrereBlaetterNacheinanderEinblenden()
    Dim Blatt
    For Each Blatt In Sheets(Array("Tabelle2", "Tabelle3"))
        Blatt.Visible = True
    Next
End Sub

- Blätter per VBE "unsichtbar" ausblenden :
Sub BlattVerstecken()
    Dim Blatt
    For Each Blatt In Sheets(Array("Tabelle2", "Tabelle3"))
        Blatt.Visible = xlSheetVeryHidden
    Next
End Sub
Oder auch ohne VBA nur per VB-Editor (VBE) :
Userbild
Gruß, NoNet
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige