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

Forumthread: Anzahl Sheets mit bestimmten Namen

Anzahl Sheets mit bestimmten Namen
Jockel
Hallo,
ich möchte in meiner Excel Mappe die Anzahl der Tabellenblätter ermitteln, die mit "Projekt" beginnen.
Hatte mir das so irgend wie gedacht:
MsgBox Worksheets(Left(Sheets(i).Name, 7) = "Projekt").Count
.. geht aber nicht.
Wie macht man das denn richtig ?
Danke
Jockel
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Anzahl Sheets mit bestimmten Namen
13.07.2012 09:19:25
{Boris}
Hi Jockel,
Du musst die Blätter mit einer Schleife abgrasen:
Public Sub Do_It()
Dim Ws As Worksheet, x As Long
For Each Ws In ThisWorkbook.Worksheets
If Left(Ws.Name, 7) = "Projekt" Then x = x + 1
Next Ws
MsgBox x
End Sub
VG, Boris
Danke, passt. owT
13.07.2012 09:58:01
Jockel
AW: Anzahl Sheets mit bestimmten Namen
13.07.2012 09:48:56
{Boris}
Hi Jockel,
ohne VBA geht das übrigens auch.
Definiere den Namen x mit Bezug auf: =ARBEITSMAPPE.ZUORDNEN(1+0*JETZT())
Dazu die Arrayformel:
{=ANZAHL(FINDEN("]Projekt";x))}
VG, Boris
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige