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

Mappe mit mehrere Arbeitsblätter erstellen

Forumthread: Mappe mit mehrere Arbeitsblätter erstellen

Mappe mit mehrere Arbeitsblätter erstellen
22.08.2007 22:05:28
Robert
Guten Abend Leute,
Ist wahrscheinlich eine Einfache Sache aber ich sehe gerade keine schnelle Lösung.
Hoffentlich könnt ihr da helfen.
Ich möchte mit VBA eine Mappe erstellen (workbooks.add) mit mehrere Worksheets. Die Worksheet names sind vorgegeben.
(Workbooks.add Names: Test1,Test2,Test3,Test4,Lösung1,Lösung2,Lösung3,Resultat1,Resultat2)
Freue mich auf eure Hilfe!
Grüsse, Robert

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mappe mit mehrere Arbeitsblätter erstellen
22.08.2007 22:24:58
K.Rola
Hallo,
probiers mal so:

Option Explicit
Option Base 1
Sub til()
Dim sh As Long, s As Long, arrSh
arrSh = Array("Test1", "Test2", "Test3", "Test4", "Lösung1", "Lösung2", "Lösung3", "Resultat1",  _
"Resultat2")
sh = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = UBound(arrSh)
Workbooks.Add
Application.SheetsInNewWorkbook = sh
For s = 1 To UBound(arrSh)
ActiveWorkbook.Sheets(s).Name = arrSh(s)
Next
End Sub


Gruß K.Rola

Anzeige
AW: Mappe mit mehrere Arbeitsblätter erstellen
22.08.2007 22:29:19
{Boris}
Hi,
nicht schön, aber selten ;-)

Option Explicit
Sub neue_mappe()
Dim Wb As Workbook
Dim str As String
Dim arr As Variant
Dim x As Long
str = "Test1,Test2,Test3,Test4,Lösung1,Lösung2,Lösung3,Resultat1,Resultat2"
arr = Split(str, ",")
Set Wb = Workbooks.Add
For x = 0 To UBound(arr)
If x + 1 > Application.SheetsInNewWorkbook Then Wb.Sheets.Add after:=Wb.Sheets(Wb.Sheets. _
Count)
Wb.Sheets(x + 1).Name = arr(x)
Next x
End Sub


Grüße Boris

Anzeige
Uups...nicht aktualisiert....oT
22.08.2007 22:30:33
{Boris}

AW: Uups...nicht aktualisiert....oT
22.08.2007 22:54:00
Robert
Hallo K.Rola und Boris,
Beide Lösungen sind Super! Habe mich aber entschieden mit der Lösung von K.Rola weiter zu arbeiten. Vielen Vielen Dank! Ohne eure Hilfe wäre ich noch ein weilchen beschäftigt
Grüsse, Robert

Forumthreads zu verwandten Themen

Alphanumerische Zahl mit Makro hochzählen
Andre´

Hallo alle zusammen,
ich habe in der Zelle A1 folgendes stehen:
2009_0000001
aufgebaut nach Jahr und einer fortlaufenden Nummer.
Wie kann ich es erreichen, dass in dieser Zelle mit jedem Makrodurchlauf
um eins höher gezählt wird.
Bsp.:
Ich starte heute einmal das Mak...
30.01.2009 09:58:00
Thread-ID: 1045302
3 Beiträge
Diagramm, Sekundärachse mit neg. Zahlen
Tina

Das ist sicher eine Frage, die schon oft gestellt wurde...ist nämlich kein neues Problem:
2 Datenreihen mit z.T. neg. Zahlen eine in % (Säule) die andere absolut (Linie)...also brauche ich 2 Achsen
Wie kann ich der Sekundärachse beibringen, daß auch hier die horizontale Achse bei 0 schn...
12.06.2009 13:36:43
Thread-ID: 1080986
9 Beiträge
Nummer auf 8 Stellen erhöhen mit führender Zahl
Thorsten

Hallo,
habe folgende Datei hochgeladen:
https://www.herber.de/bbs/user/66598.xls
Folgende Bitte: In Spalte B hätte ich gerne eine Formel, welche die Kundennummer aus Spalte A mit einer führenden 5 auswirft und gleich auf 8 Stellen ausfüllt.
Vielen Dank für die Hilfe
Thorste...
15.12.2009 09:27:50
Thread-ID: 1123956
2 Beiträge
erstellen einer Zahlungsübersicht
Lehmann

Hallo,
befasse mich gerade zum ersten Mal mit Excel und versuche eine Tabelle mit entsprechender Zahlungsübersicht und verschiedenen Fälligkeiten zu erstellen.
Posten 1, 100€, Beginn am 1.1.2000 und alle 3 Monate fällig
Posten 2, 75€, Beginn am 1.8.2009 und monatlich fällig
Pos...
24.01.2010 18:57:15
Thread-ID: 1132508
15 Beiträge
Freistellen einer Zahl
Stefan

Hallo,
ich habe viele Zahlen, die nach der füpnften Stellen mit einem Minus weiter gehen, also z.B. 12467-r1/f6
Mit welcher Funktion kann ich die 5-stellige Zahl freistellen, also so dass ich im Ergebnis erhalte: 12467,
Danke und liebe Grüße
Stefan
15.07.2010 17:35:35
Thread-ID: 1167339
6 Beiträge
Zahlen mit zwei Stellen
Björn

Ich denke mal für hier ist diese Frage eine etwas banale.
Aber ich komme nicht darauf.
Ich möchte eine Zahl im einstelligen Bereich mit einer Null vorangestellt haben.
Dies möchte ich im Benutzerdefinierten Format so abbilden dass z.B. KW02/11 dargestellt wird.
Ich habe bisher a...
06.12.2010 17:06:35
Thread-ID: 1190291
5 Beiträge
Anzahl der Nullen einer Zahl ermitteln
Micha

Hallo,
wie kann ich die Anzahl der Nullen einer Zahl ermitteln?
zB: 10000000000000000000000000000000000000000000000000000000000000000000000
Gruß
Micha
14.06.2011 18:21:56
Thread-ID: 1218404
3 Beiträge
Anzahl ungleiche Zellen mit einer Bedingung zählen
Ingo4711

Hallo Forum,
ich möchte euch um Hilfe beim Zählen bitten.
Ich habe rund 5.000 Zeilen mit Auftragsdaten. Für alle Artikel eines jeden Auftrags möchte ich die Anzahl der unterschiedlichen Lieferanten zählen. Mit der Formel Summenprodukt bekomme ich die Bedingung 'zähle nur unterschiedlich...
28.10.2011 11:51:26
Thread-ID: 1235775
7 Beiträge
Zahlen mit Leeerstellen in Zellen aufteilen
Dieter(Drummer)

Guten Morgen VBA Spezialisten,
im aktiven Sheet stehen in der Zelle B28 (Zellformat: Standard) 6 zweistellige Zahlen, die zwischen den Zahlen jeweils 2 Leerstellen haben. Die erste 2stellige Zahl soll in die B26, die Zweite 2stellige Zahl in C26 usw ... (Zellformat: Standard).
Nun suche...
22.01.2012 10:26:22
Thread-ID: 1247400
20 Beiträge
Sekundenzähler mit Binärzahlen
Stefan

HalloIn dem folgenden Programm werden die Zahlen von 0 bis 7 Sekunden gezählt. Ich möchte auch, daß in der Spalte neben den Sekunden im Direktfenster die jeweilige Zahl als Binärzahl haben. Er gibt mir immer nur die 7 bei jeder Zahl als Binärzahl aus. Wie kann ich dieses realisieren, daß bei je...
01.06.2002 01:44:22
Thread-ID: 125206
2 Beiträge
Ganzzahl oder mit Nachkommastellen
Dieter(Drummer)

Hi Formelspezialisten,
ich suche eine Wenn-Formel, die es ermöglicht, eine Zahl in einer Zelle zu prüfen, ob es eine Zahl OHNE Nachkommastellen ist oder MIT. Die Zahlen werden per Functionsmakro ermittelt.
Danke für's drum kümmern und evtl. Hilfe.
Gruß, Dieter(Drummer)
14.03.2012 09:29:33
Thread-ID: 1254896
6 Beiträge
Anzahl der Wochentage innerhalb einer Woche zählen
Hans

Hallo,
ich suche eine Formel mit der ich zählen kann, wie oft der jeweilige Wochentag für die aktuelle Woche in der Datei Werte.xlsx in Spalte C vorhanden ist.
In der Datei Mappe1.xlsx sollen die Werte dann in den Zellen J15 bis N15 eingetragen werden.
Also nur Zählen wenn Werte de...
08.03.2014 18:52:01
Thread-ID: 1352718
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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