VBA til at tælle antal celler med en bestemt celleværdi

Jeg har kikket efter en array, til at udføre hvad TÆL.HVIS gør som formel, men uden held.

Jeg har et ark hvor der i Kolonne A, med start i A1 og ned til sidste celle med værdi, skal tælles antal celler der indeholder en bestemt værdi.

Eksempel:
Ud fra dette range skal der tælles antal celler med en bestemt værdi, fx værdien 100:
Range(("A1"), Range("A1").End(xlDown)).Select
Resultatet skal indsættes i B1.

Hvordan gør man det?

På forhånd tak
Laugesen