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

Alle Blätter durchlaufen

Alle Blätter durchlaufen
27.07.2003 12:27:04
Erich
Hallo wer kann mir weiterhelfen?
Wie kann man alle Blätter durchlaufen bei Blatt 1-3 nichts machen bei Blatt 4-10 dieselben bestimmten Aktionen durchführen, Blatt 11-16 nichts machen, Blatt 17 wieder dieselbe Aktion durchführen, Blatt 18-20 nichts machen?
Vielen Dank im Voraus.
Erich

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle Blätter durchlaufen
27.07.2003 12:31:40
Hajo_Zi
Hallo Erich

Sub Durchlauf()
Dim WsTabelle As Worksheet
For Each WsTabelle In Worksheets
Select Case WsTabelle.Name
Case "Tabelle1", "Tabelle2"
' Deine Aktion
End Select
Next WsTabelle
End Sub

Gruß Hajo
Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.

Anzeige
AW: Alle Blätter durchlaufen
27.07.2003 13:54:26
Erich
Danke Hajo, das funktioniert hervorragend.
Gruß
Erich

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige