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

Tabellenblätter erstellen

Forumthread: Tabellenblätter erstellen

Tabellenblätter erstellen
20.07.2014 04:45:08
walter
Guten Morgen Excelfreunde,
In Tabelle 1 stehen in Spalte "A" bis zu 40 Ländernamen, von denen ein Tabellenblatt erzeugt werden muß.
Wie läßt sich dies lösen.
Danke für die Hilfe.
Gruß
Walter

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblätter erstellen
20.07.2014 06:32:25
Bernd
Hallo Walter!
Wurde hier schon mal gelöst. Verwende nachstehenden VBA Code in Deiner Arbeitsmappe:
~ 

Sub tabneu()
Dim i, z As Double
ActiveSheet.Range("A:A").End(xlDown).Offset(1, 0).Select
z = ActiveCell.Row
z = z - 1
For i = 1 To z
Sheets(2).Select
Sheets.Add
ActiveSheet.Name = Sheets(1).Cells(z, 1).Value
z = z - 1
Next i
End Sub
~
lg wünscht Bernd

Anzeige
AW: Tabellenblätter erstellen
20.07.2014 08:55:13
walter
Hallo Bernd,
habe ich gesucht aber nicht gefunden.
Heißen Dank für den Hinweis.
Schönen Sonntag
wünscht
Rentner Walter aus dem nördlichen Nordhessen
;

Beliebteste Forumthreads (12 Monate)

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