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

Blätter automatisch erstellen

Blätter automatisch erstellen
04.08.2005 11:25:38
Rupert
Hallo Forum,
Ich hab ein weiteres Problem zu meinem Fall vom Montag,
Ich habe eine Liste in der ich ca. 40 Bezeichnungen stehen habe, nun möchte ich Excel dazu bewegen mit neue Tabellenblätter mit den Bezeichnungen anzulegen.
Heisst Excel soll anhand der Beispielmappe die Spalte C abprüfen und dann solange in C ein Wert steht Tabellenblätter anlegen, des weiteren sollte es so sein, das es anhand der Spalte C den ersten wert in der Spalte nimmt, mit diesem Wert eine andere Tabelle filtert und dann die Werte in das entsprechende neue Tabellenblatt reinkopiert. Da dies bei zwei listen gesehen soll bräuchte ich auch noch die Formel damit ich die erste leere Zelle in der Spalte A rausfinde und dann da hinkopiere.
https://www.herber.de/bbs/user/25310.xls
danke vorerst

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

Betreff
Datum
Anwender
Anzeige
AW: Blätter automatisch erstellen
04.08.2005 15:58:15
Niels
Für die Erstellung der Tabellen versuch mal so:
Application.ScreenUpdating = false
For a = 5 To 43
Sheets.Add After:=Sheets(1)
Next a
For b = 2 To 40
Sheets(b).Name = Sheets("Tabelle1").Cells(b + 3, 3).Value
Next b
Application.ScreenUpdating = true
Das mit dem Tabelle Filtern hab ich noch nicht ganz verstanden.
Gruß Niels
AW: Blätter automatisch erstellen
04.08.2005 15:58:28
Niels
Für die Erstellung der Tabellen versuch mal so:
Application.ScreenUpdating = false
For a = 5 To 43
Sheets.Add After:=Sheets(1)
Next a
For b = 2 To 40
Sheets(b).Name = Sheets("Tabelle1").Cells(b + 3, 3).Value
Next b
Application.ScreenUpdating = true
Das mit dem Tabelle Filtern hab ich noch nicht ganz verstanden.
Gruß Niels
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige