Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1176to1180
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
1176to1180
1176to1180
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Alle Tabellenblätter mit Schleife durchlaufen

Alle Tabellenblätter mit Schleife durchlaufen
Mandy
Hallo,
ich habe eine Mappe mit mehreren Tabellenblätter. Auf allen Tabellenblätter, die mit "Bestand" beginnen, möchte ich ein bestimmtest Makro ausführen.
Wie starte ich einen Durchlauf, bei dem ich die einzelnen "Bestand xxx" Tabellenblätter durchlaufe und überall mein Makro ausführen kann ?
Danke
Mandy
AW: Alle Tabellenblätter mit Schleife durchlaufen
21.09.2010 09:31:30
Hajo_Zi
Hallo Mandy,
Private Sub Aufheben()
Dim WsTabelle As Worksheet
For Each WsTabelle In Sheets
With WsTabelle
' Dein Makro, Cells und Range mit Punkt
End With
Next WsTabelle
End Sub

AW: Alle Tabellenblätter mit Schleife durchlaufen
21.09.2010 09:58:25
Mandy
Hallo Hajo,
ich weiß nicht, ob wir vom gleiche reden. Durchläuft der Code alle Tabellenblätter, die mit "Bestand" beginnen ? (können unterschiedlich heißen > "Bestend CPU", "Bestand MEM"; "Bestand ROM" ....)
Das code führt mein Makro immer nur auf dem aktiven Tabellenblatt aus, wechselt aber nicht zum nächsten.
Gruß
Mandy
Anzeige
AW: Alle Tabellenblätter mit Schleife durchlaufen
21.09.2010 10:00:20
Hajo_Zi
Hallo Mandy,
es Stand doch alle durchlaufen und das macht das Makro. Auf select und Activate kann zu 99,9% _ verzichtet werden. Den Text 

Cells und Range mit Punkt
hast Du schon beachtet?
Gruß Hajo
AW: Alle Tabellenblätter mit Schleife durchlaufen
21.09.2010 10:17:14
Mandy
Hallo Hajo,
OK, mein Makro wird in allen Tabellenblätter ausgeführt, aber leider in ALLEN. Der Code soll nur da ausgeführt werden, bei denen das Tabellenblatt mit "Bestand" beginnt (erst 7 Zeichen) , andere Tabellenblätter sollen ausgeschlossen werden.
Danke
Mandy
Anzeige
AW: Alle Tabellenblätter mit Schleife durchlaufen
21.09.2010 10:21:49
Hajo_Zi
Hallo Mandy,
Option Explicit
Private Sub Aufheben()
Dim WsTabelle As Worksheet
For Each WsTabelle In Sheets
If Left(WsTabelle.Name, 7) = "Bestand" Then
With WsTabelle
' Dein Makro, Cells und Range mit Punkt
End With
End If
Next WsTabelle
End Sub
Gruß Hajo
ah, jetzt, danke schön owT :-)
21.09.2010 11:11:49
Mandy

56 Forumthreads zu ähnlichen Themen

Makro für alle Exceldatei verwenden
Günter

Guten Tag,
liebe Excelgemeinde. Habe durch euch ein wunderbares Makro bekommen.
Nun kann ich dieses Makro nur in einem Arbeitsblatt benutzen.
Möchte dieses aber in allen Exceldateien verwenden können.
Habe schon probiert, dieses in der Personl.xls zu hinterlegen.
Klappt aber...
26.07.2009 11:17:30
Thread-ID: 1091371
6 Beiträge
Anzeige
Sortierungs-Makro über allen Tabellenblätter
Luke

Hi!
Mein Thema wurde hier schon öfters behandelt, doch es scheint als sei ich nicht Fähig das hinzukriegen. Ich möchte gerne mit einem Makro mehrere Tabellenblätter ansprechen. Ziel: Beim Klick auf den Button sollten sich 13 Tabellenblätter (simultan) absteigend (nach Spalten E und F) sorti...
27.08.2009 15:43:30
Thread-ID: 1099010
3 Beiträge
alle Sheets mit bestimmten Namen markieren
Micha.hal

Hallo Excelperten,
wie kann ich in einer Datei per VBA alle Blätter markieren, deren Name mit einem "a" oder einem "b" endet?
Micha
01.10.2009 10:24:08
Thread-ID: 1106585
14 Beiträge
Anzeige
Makro für viele Tabellenblätter anwenden
mat

Hallo liebes Forum,
ich habe eine Arbeitsmappe mit 40 Tabellenblättern.
Über das Makro Sub format() formatiere ich jedes Tabellenblatt einzeln. Wie kann ich das Makro über alle Tabellenblätter automatisch laufen lassen (Ausnahme Sheet Data)
Viele Grüße
Mat
24.03.2010 22:23:59
Thread-ID: 1148241
2 Beiträge
Makro für alle Arbeitsblätter
Basti

Guten Morgen zusammen,
am frühen Morgen macht VBA mal wieder nicht das, was ich möchte.
Folgendes Problem:
Ich habe ein Makro in einem Arbeitsblatt aufgezeichnet und möchte nun, dass dieses Makro in allen Arbeitsblättern ausgeführt wird. (Die Anzahl der Arbeitsblätter sind in mehrer...
27.08.2010 08:50:58
Thread-ID: 1174432
8 Beiträge
Makro für auf mehrere Tabellenblätter anwenden
Mat

Hallo liebes Forum,
wie kann ein ein vorhandenes Modul (Makroname = Sub Formatieren) über alle vorhandenen Tabellenblätter laufen lassen, mit Ausnahme des Tabellenblattes data.
Gruß Mat
21.03.2011 16:31:15
Thread-ID: 1206697
7 Beiträge
Auswahl mehrerer Blätter mit variablem Namen
Philipp

Hallo Forum!
Ich habe glaube ich gerade ein Brett vor dem Kopf.
Ich möchte mehrere Arbeitsblätter variabel auswählen.
Gibt es hier eine Möglichkeit, anhand der Blattnummer zu sagen:
Auswahl der Blätter 5 bis 9?
Alternative wäre es möglich, den Namen des Arrays zu "basteln".<...
01.04.2011 17:27:36
Thread-ID: 1208734
6 Beiträge
Alle Tabellenblätter mit "Vorhaben" löschen
Kai

Hallo,
ich habe ein Makro, das legt bei Bedarf verschiedene Tabellenblätter an. Darunter gibt es dann auch viele, die nennen sich "Vorhaben01", "Vorhaben02" ..usw.
Ich möchte nun alle Tabellenblätter, die mit den ersten 8 Zeichen mit "Vorhaben" beginnen (egal, was dahinter noch kommt) l...
18.04.2011 08:19:39
Thread-ID: 1210851
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
3
2
13
3
1
7
6
5
3
1
18
6
2
8
9
6
4
3
7
3
8
6
3
4