• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Aantal werkbladen tellen aan de hand van gegeven uit één bepaalde cel

Status
Niet open voor verdere reacties.

Gerald Baalhuis

Gebruiker
Lid geworden
14 jan 2006
Berichten
369
Is het mogelijk om het aantal werkbladen te tellen aan de hand van de inhoud van (telkens dezelfde) cel van elk werkblad?
Ik heb een excel sheet met ongeveer 400 werkbladen. Eén werkblad is het 'hoofdblad'. Op elk werkblad staat in cel C3 een verwijzing naar cel C5 in dat hoofd werkblad, waar de gebruiker een datum invuld.
In alle cellen C3 van de andere werkbladen wordt hiermee de startdag bepaald.
Ik wil nu graag het aantal werkbladen met dezelfde startdag in cel C3 tellen.
Per startdag zou het dan helemaal perfect zijn als de inhoud van de cellen A2 (Apotheeknaam) en A6 t/m A16 (afdelingen) op een nieuw tabblad verzameld worden.

Bijgevoegd een voorbeeld in erg afgeslankte vorm.

Gerald
 

Bijlagen

Code:
Sub TelBladen()

Dim Teller As Variant
Dim WS As Variant

Teller = 0

    For Each WS In Worksheets
        If WS.Range("C3") = Worksheets("Hoofdblad").Range("C5") Then
            Teller = Teller + 1
        End If
    Next WS

    Worksheets("Hoofdblad").Range("C3").Value = Teller

End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan