Tæl antal i gruppe ?

Du kan bruge en =TÆL.HVIS(), når der kun skal tælles på en enkelt faktor.

Formlen er ret enkel:
=tæl.hvis(A1:A100;8210)

Denne tæller alle postnumre i området A1-100, som er 8210. Vær opmærksom på, at der skal anførselstegn om, hvis der er tale om tekst.

Du kan også indsætte en cellereference i stedet for en værdi efter semikolonnet.

Ja jeg ville lave en formel som f.eks. var =TÆL.HVIS(D1:D3000;T2)

Så kan du i T2 skrive det post nr du ville vide antallet af og i cellen med formlen får du resultatet.. Eventuelt kunne du skrive noget tekst til for at lette forståeligheden for andre.

Det lød nemt, men jeg syntes ikke lige.
Jeg markerer kolonne, hvor postnr står. Herefter går jeg på summa (tæl). Der popper et vidue op med angivelse af værdier. Jeg angiver alle mine postnumre F2:F1975 Hvad skal der så stå i værdi 2 ??? Jeg vil gerne have den tæller antallet af postnumre i rækkerne ?

Til mads - det er lidt af en opgave at skrive alle postnumre ind på T2. Jeg skal bruge en fordeling af alle postnumre. Altså
2000 - 10 stk
2100 - 300 stk
2120 - 35 stk
etc.

Det lyder som om, du i stedet for skulle lave en pivot-tabel. Den kan du osse få til at tælle

Hvis du skal lave løsningen med TÆL.HVIS(), slipper du ikke for noget benarbejde. I dit tilfælde ville jeg nok lave et ny kolonne med alle postnumre. Derefter ville jeg ud for hvert postnummer indsætte formlen =TÆL.HVIS(F$2:F$1975;G2)

I dette eksempel er det første postnummer listet i G2. Øvelsen kan naturligvis også gennemføres på et "rent" ark.

Du kan bruge funktionen Subtotal under menuen Data. Sørg for at der er sorteret i postnummerorden. vælg derefter Data - subtotal. Angiv at det er postnr du vil have subtotal for, og vælg at det er antallet, du vil have vist.

Her er en array function

Public Function CountAll(Area As Range) As Variant
Dim I As Integer, N As Integer, Antal() As Variant
Dim Tjek As Variant, Start As Boolean
Start = True
I = 0
ReDim Antal(I)
For Each c In Range(Area.Address)
If Start Then
    Antal(I) = c & " 1"
    Else
        For N = 0 To I
            Tjek = Split(Antal(N), " ")
            If IsNumeric(c) Then
                  If Val(Tjek(0)) = c.Value Then
                    Antal(N) = Tjek(0) & " " & Val(Tjek(1)) + 1
                    'Tjek = Empty
                    GoTo Fundet
                    End If
                  Else
                    If (Tjek(0)) = c.Value Then
                    Antal(N) = Tjek(0) & " " & Val(Tjek(1)) + 1
                    'Tjek = Empty
                    GoTo Fundet
                    End If
              End If
        Next
        I = I + 1
    ReDim Preserve Antal(I)
    Antal(I) = c & " 1"
    End If
Fundet:
Start = False
Next
CountAll = WorksheetFunction.Transpose(Antal)
End Function

Husk at bruge CTRL+SHIFT ENTER

hører gerne om forbedringer

OK - kabbak - du ser ud til at du kan dit kram - men det der fatter jeg ikke en meter af.
b_hansen kom med den forkromede løsning. Man er først nød til at lave liste med postnumre og derefter en tæl hvis funktion, der referer til denne kolonne - tak for indsatsen