Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
672to676
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
672to676
672to676
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
per VBA Tabelle erstellen mit lfd. Nr.
30.09.2005 10:39:29
Robert
Hallo,
wie kann ich per VBA einmalig eine gewisse Anzahl Tabellen erstellen, z.B.
Blatt 01
Blatt 02
Blatt xx
Vielen Dank Robert

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

Betreff
Datum
Anwender
Anzeige
AW: per VBA Tabelle erstellen mit lfd. Nr.
30.09.2005 10:58:05
harry
hi,
For i= 1 to 3
ActiveWorkbook.Sheets.Add After:=Worksheets(1)
ActiveSheet.Name = "Blatt 0" & i
Next i
liebe grüße,
harry
AW: per VBA Tabelle erstellen mit lfd. Nr.
30.09.2005 11:07:29
u_
Hallo,

Sub neueBlaetter()
Dim i As Integer, iAnz As Variant, wks As Worksheet, strFormat As String
iAnz = InputBox("Anzahl")
If iAnz <> "" Then
strFormat = WorksheetFunction.Rept("0", Len(iAnz))
For i = 1 To iAnz * 1
Set wks = Worksheets.Add(after:=Worksheets(Worksheets.Count))
wks.Name = "Blatt_" & Format(i, strFormat)
Next i
End If
End Sub
Gruß
Geist ist geil!
Anzeige

321 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige