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

Anzahl der Sheets bei Workbooks.Add

Anzahl der Sheets bei Workbooks.Add
05.03.2007 10:49:33
MikeS
Hallo Leute,
wie kann ich nochmal bei Hinzufügen einer neuen Arbeitsmappe mit Workbooks.Add , die Anzahl der enthaltenen Blätter bestimmen?
Vielen Dank
Mike

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Anzahl der Sheets bei Workbooks.Add
05.03.2007 11:22:24
Case
Hallo,
probier mal das:
Option Explicit
Sub Test()
MsgBox "Microsoft Excel fügt " & _
Application.SheetsInNewWorkbook & _
" Tabellenblätter in jedem neuen Workbook ein"
Application.SheetsInNewWorkbook = 2
Workbooks.Add
Workbooks.Add xlWBATWorksheet
Workbooks.Add -4167
End Sub

Die MsgBox gibt Dir aus, wieviele Tabellenblätter in einem neuen Workbook erstellt werden.
Application.SheetsInNewWorkbook = 2 setzt das auf 2 Tabellenblätter.
Workbooks.Add - damit siehst Du, ob es geht.
Workbooks.Add xlWBATWorksheet - das bringt immer ein Tabellenblatt.
Workbooks.Add -4167 - das gleiche mit der Konstanten.
Servus
Case
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige