Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Arbeitsblätter zählen

Forumthread: Arbeitsblätter zählen

Arbeitsblätter zählen
22.05.2003 14:32:30
uloh
Hallo Leute,

ich habe eine Arbeitsmappe in der die Tabellenblätter nach Datum sortiert sind:
1.1.2003
2.1.2003
4.5.2003
5.5.2003
usw.

Ist es möglich die Anzahl der Arbeitsblätter pro Monat zu ermitteln, z.B. für Januar oder Mai.

Vielen Dank im Voraus
MfG
Uwe

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Arbeitsblätter zählen
22.05.2003 14:57:24
Martin Beck

Hallo Uwe,

wenn alle Tabellenblätter solche "Datumsnamen" haben, so daß mindestens ein Punkt vorkommt, z.B. wie folgt:

In diesem Beispiel wird für Januar gezählt. Du kannst die Zeile

Const m = 1

für andere Monate anpassen oder mit Inputbox arbeiten.

Gruß
Martin Beck


Anzeige
Re: Arbeitsblätter zählen
22.05.2003 15:09:17
Kai

Klar, Uwe,

mach folgendes:

For Each Sh In Sheets
Select case mid(sh.name,len(sh.name)-6,2)
case "01"
Jan = Jan + 1
case "02"
Feb = Feb + 1
...

bis
case "12"
Dec = Dec + 1
end select

next SH

Die Variablen Jan , Feb etc geben dir nun die Anzahl der Tage pro Monat an. Diese Werte für Jan bis Dec kannst du natürlich ausdrucken oder anzeigen lassen oder sonstwie weiterverarbeiten. Wichtig ist, dass du die Tagesblätter in der Form T.MM.JJJJ benennst, also z.B. 1.01.2003 oder 27.04.2003.

Gruss
Kai


Anzeige
Re: Arbeitsblätter zählen
22.05.2003 17:21:54
uloh

Danke,
das hat ein einziges mal funktioniert,
aber dann nicht mehr!
Ich weis nicht wo es hängt.
Das Makro meldetin der Zeile:
Select Case Mid(SH.Name, Len(SH.Name) - 6, 2)
ungültiger Prozeduraufruf, oder ungültiges Argument.
MfG
Uwe


;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige