Samenvoegen van countif tot countifs

Status
Niet open voor verdere reacties.

Dominic003

Nieuwe gebruiker
Lid geworden
14 mei 2018
Berichten
1
Beste iedereen,

Ik ben nog niet zo lang geleden begonnen met het verkennen van VBA. Nu probeer ik voor een grotere file een standaard-programmaatje te maken om het aantal keer er een registratie gebeurd is in een database te tellen. Er moet dus een aantal datums geteld worden tussen twee datums die kunnen worden ingegeven in een userform. Het volgende heb ik proberen samen te stellen maar ik kom niet tot een resultaat:

dim intCount as Integer

intCount = Application.WorksheetFunction.Countifs(Worksheets("Blad1").Range("A:A"), ">=" & txtBegindatum, Worksheets("Blad1").Range("A:A"), "<=" & txtEinddatum)

De begin- en einddatum worden opgegeven in de userform.

Mocht iemand van jullie mij kunnen helpen hiermee zou ik jullie eeuwig dankbaar zijn!

Dominic
 
Misschien dat dit soelaas biedt anders moet je een bestand plaatsen, want er zijn meerdere wegen naar....
Code:
Application.Countifs(Worksheets("Blad1").Range("A:A"), ">=" & [COLOR=#0000ff]cdate(txtBegindatum)[/COLOR], Worksheets("Blad1").Range("A:A"), "<=" &[COLOR=#0000ff] cdate(txtEinddatum)[/COLOR])
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan