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

Code in mehreren Tabellen gleichzeitig ausführen

Forumthread: Code in mehreren Tabellen gleichzeitig ausführen

Code in mehreren Tabellen gleichzeitig ausführen
21.07.2008 14:41:34
TomTom
Hi,
ich möchte folgenden Code auf allen Tabellenblätter ausführen, die mit "Vorgang" beginnen.
TextBox2.Top = TextBox1.Top + TextBox1.Height + 10
TextBox3.Top = TextBox2.Top + TextBox2.Height + 10
TextBox4.Top = TextBox3.Top + TextBox3.Height + 10
Auf allen Tabellenblätter, die mit "Vorgang" beginnen , sind Textboxen angeordnet und die sollen alle im gleichen Abstand (für jedes Blatt) angeortnet werden.
Wie mache ich die Abfrage auf alle meine Tabellenblätter (aber nur die beginnend mit "Vorgang")
danke
mal
Tom

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Code in mehreren Tabellen gleichzeitig ausführen
21.07.2008 14:45:35
Worti
Hallo Tom,
mit dieser Schleife sollte es gehen:
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
If Mid(ws.Name, 1, 7) = "Vorgang" Then
'Deine Anweisungen
End If
Next ws
Gruß
Worti

AW: Code in mehreren Tabellen gleichzeitig ausführ
21.07.2008 19:11:19
TomTom
Hallo Worti,
habe mit Deinem Beispiel probleme , funktioniert leider nicht:
schau mal mein beispiel an:
https://www.herber.de/bbs/user/54035.xls
Gruss
Tom

Anzeige
AW: Code in mehreren Tabellen gleichzeitig ausführen
21.07.2008 14:48:49
Rudi
Hallo,
gleichzeitig geht nicht. Nacheinander.

Sub tt()
Dim wks As Worksheet
Application.ScreenUpdating = False
For Each wks In Worksheets
If wks.Name Like "Vorgang*" Then
With wks
.TextBox2.Top = .TextBox1.Top + .TextBox1.Height + 10
.TextBox3.Top = .TextBox2.Top + .TextBox2.Height + 10
.TextBox4.Top = .TextBox3.Top + .TextBox3.Height + 10
End With
End If
Next wks
Application.ScreenUpdating = True
End Sub


Gruß
Rudi

Anzeige
AW: Code in mehreren Tabellen gleichzeitig ausführ
21.07.2008 19:05:53
TomTom
Hi rudi,
Danke mal, kannst Du an meinem Beispiel erkennen , warum das nicht richtig funzt. In "START" soll der Button gedrückt werden und dann der Code auf eden restlichen Tabellenblättern ausgeführt werden:
Geht leidet nicht.
https://www.herber.de/bbs/user/54033.xls
Gruss
Tom

Anzeige
AW: Code in mehreren Tabellen gleichzeitig ausführ
21.07.2008 22:22:04
Rudi
Hallo,
in der Mappe gibt es keine Sheets mit Namen Vorgang*, wie in deiner Frage beschrieben.
Passe meinen Code entsprechend deiner Mappe an.
Gruß
Rudi

AW: Code in mehreren Tabellen gleichzeitig ausführ
22.07.2008 10:02:00
TomTom
Hallo Rudi,
das ist klar, das hatte ich gemacht, war ja auch nur ein Beispiel. Wenn Du in meinem Beispiel das Makro anschaust, dann sollte es ja auch mit "Tabelle" funktionieren.
der Code funktioniert immer nur auf der aktuellen Seite, die Schleife scheint nicht durchzulaufen.
Gruss
Tom
Anzeige
;

Forumthreads zu verwandten Themen

Autofilter über mehrere Tabellenblätter
Burk

Hallo,
ich habe mehre Blätter in einer Mappe mit jeweils einer großen Liste
Gibt es die Möglichkeit Datensätze mit einem bestimmten Feldeintrag über mehre Blätter hinweg gleichzeitig herauszufiltern, wie es der Autofilter mit einer Tabelle macht?
Vielleicht mit VBA?
Bin für alle...
02.07.2009 11:17:06
Thread-ID: 1085862
5 Beiträge
Anzeige
summe über mehrere Tabellenblätter
Volker

Hallo Liebe Excel- Gemeinde
In einem Forum habe ich mal eine Hinweis auf eine "Summen- Formel" gelesen, die aus einer Arbeitsmappe eine Summe aus allen Tabellenblätter dieser Mappe aus einer bestimmten Zelle zusammen bildet.
Also mein Problem ist
1. aus einer Arbeitsmappe immer die...
31.01.2010 13:23:17
Thread-ID: 1134569
6 Beiträge
SUMMEWENN über mehrere Tabellenblätter
Wolf

Hallo, kann ich denn die Formel SUMMEWENN über mehrere Tabellenblätter anwenden?
Der Eintrag der Daten, mit denen abgeglichen werden soll, sind über eine selbst zu erstellende Liste mittels eines Klappmenüs auszuwählen.
Damit es nicht allzu abstrakt ist: Es handelt sich um ein Raumbuch...
10.02.2010 11:54:52
Thread-ID: 1137344
2 Beiträge
SUMMEWENN über mehrere Tabellenblätter
Wolf

Hallo, kann ich denn die Formel SUMMEWENN über mehrere Tabellenblätter anwenden?
Der Eintrag der Daten, mit denen abgeglichen werden soll, sind über eine selbst zu erstellende Liste mittels eines Klappmenüs auszuwählen.
Damit es nicht allzu abstrakt ist: Es handelt sich um ein Raumbuch...
10.02.2010 12:57:50
Thread-ID: 1137372
4 Beiträge
Anzeige
SUmme über mehrere Tabellenblätter bilden
Wolf

Hallo, ich hatte schon mal diese Frage gestellt, aber mit der Antwort kam ich nicht richtig weiter (10.2.10).
Ich muss die Formel SUMMEWENN über mehrere Tabellenblätter anwenden. Der Eintrag der Daten, mit denen abgeglichen werden soll, sind über eine auf einem eigenen Tabellenblatt selbst...
24.02.2010 12:24:40
Thread-ID: 1141005
9 Beiträge
Anzeige
Indirekt über mehrere Tabellenblätter
Jessica

Hallo,
ich habe ein Problem, für das ich bereits in einem älteren Thread eine Lösung gefunden habe. Leider funktioniert das bei mir nicht! :-(
Ich habe 12 Sheets mit den Namen "Januar" bis "Dezember"
Auf dem Übersichtsblatt möchte ich in D2 den Monat eingeben, z.B. März und dann sol...
27.02.2010 08:14:02
Thread-ID: 1141906
2 Beiträge
Mehrere Pivottabellen gleichzeitig anpassen
Frank

Hallo zusammen!
Ich habe ein Arbeitsblatt "Tabelle 4", in dem sich zehn verschiedene Pivottabellen befinden, die alle ein Feld namens "CMT_L2" beinhalten.
Bei Änderung dieses Feldes in einer der Pivottabellen möchte ich erreichen, daß auch alle anderen Pivottabellen dementsprechend ange...
31.03.2010 09:43:27
Thread-ID: 1149532
4 Beiträge
auf mehreren Blättern Filter anwenden
Manuela

Hallo liebe Helfer,
ich habe eine Datei mit mehreren Blättern.
Auf allen Blättern ist ein Filter.
Ich möchte nun z.b. die Spalte D auf allen Blätter den selben Filter anwenden.
Kann man das automatisieren, oder muss ich jedes Blatt einzelnt anklicken und den Filter setzen?
l...
05.10.2010 14:31:44
Thread-ID: 1180719
7 Beiträge
Formel auf mehrere Arbeitsblätter anwenden
Philipp

Hallo!
Die unten stehende Formel bildet in einem anderen Arbeitsblatt (Name:Oghren) eine Summe, wenn verschiedenste Bedingungen gegeben sind und gibt diese im Feld M3 im Arbeitsblatt "Menelaos" wieder.
Die Formel funktioniert einwandfrei.
=WENN(Oghren!$V$6"";SUMMENPRODUKT((Oghren!$...
14.02.2011 21:12:25
Thread-ID: 1200806
10 Beiträge
suche über mehrere Tabellenblätter
Stefan

Hallo zusammen,
ich weiß hier nicht mehr weiter. Ich will eine Tabelle mit mehreren Blättern auswerten. Die Blätter sind alle gleich aufgebaut. In den Spalten AF und AG stehen die Suchkriterien und in Spalte D steht der zugehörige Name. Nun soll die Auswertung folgendermassen ablaufen: Es...
10.03.2011 20:07:39
Thread-ID: 1205137
3 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
Übertragung Daten in mehrere Tabellenblätter
hubijuerg

Hallo,
könnt Ihr mir bei folgendem Problem helfen? Über ein Makro öffne ich für jede Vorgangsnummer mehrere, in der Benennung unterschiedliche Tabellenblätter (Vorgangsnummern). Die Tabellenblättern (Vorgangsnummer) durchsuchen das Tabellenblatt (Basisdaten) nach dem Suchbergiff "Arbeitsplä...
31.03.2011 11:36:25
Thread-ID: 1208444
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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