Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
704to708
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
704to708
704to708
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Alle Tabellenblaetter einblenden

Alle Tabellenblaetter einblenden
07.12.2005 15:33:10
Otto
Hallo,
ich benutze im VBA:
Sheets("tabelle 1").Visible = True
um einen versteckten Blatt einzublenden.
Kann man alle versteckte Tabellen in einer Mappe einblenden, unabhaengig davon wieviel sie sind und wie sie umbennant wurden?
Danke
Otto

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle Tabellenblaetter einblenden
07.12.2005 15:36:26
Kurt
Hi,
Dim sht as Object
for each sht in thisworkbook.sheets
sht.visible = true
next
mfg Kurt
AW: Alle Tabellenblaetter einblenden
07.12.2005 15:37:03
Andi
Jepp, kann man:

Sub einblenden()
Dim a As Integer
For a = 1 To Sheets.Count
Sheets(a).Visible = True
Next a
End Sub

Schönen Gruß,
Andi
AW: Alle Tabellenblaetter einblenden
07.12.2005 15:39:46
Otto
Vielen Dank, Kurt und Andi fuer die schnelle Antwort.
Gruss
Otto
Gern geschehen... (ot)
07.12.2005 15:44:15
Andi
.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige