Vba: numero maggiore della data

È possibile utilizzare la seguente sintassi di base in VBA per contare il numero di date maggiori di una data specifica:

 Sub CountifGreaterDate()
Range(" D2 ") = WorksheetFunction.CountIf(Range(" A2:A10 "), ">" & Range(" C2 "))
End Sub

Questo particolare esempio conta il numero di date nell’intervallo A2:A10 maggiori della data nella cella C2 .

Il risultato viene quindi assegnato alla cella D2 .

L’esempio seguente mostra come utilizzare questa sintassi nella pratica.

Esempio: contare maggiore della data utilizzando VBA

Supponiamo di avere il seguente elenco di date in Excel e vorremmo conoscere il numero di date maggiori di 25/04/2023 :

Per fare ciò possiamo creare la seguente macro:

 Sub CountifGreaterDate()
Range(" D2 ") = WorksheetFunction.CountIf(Range(" A2:A10 "), ">" & Range(" C2 "))
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

La cella D2 ci dice che ci sono 6 date nell’intervallo A2:A10 maggiori di 04/25/2023 .

Tieni presente che possiamo modificare il valore nella cella C2 ed eseguire nuovamente la macro per contare il numero di date maggiori di una data specifica diversa.

Ad esempio, supponiamo di modificare la data nella cella C2 in 1/10/2023 ed eseguire nuovamente la macro:

Vediamo che ci sono 3 date maggiori di 10/1/2023 .

Nota: se desideri contare il numero di date maggiori o uguali a una data specifica, sostituisci semplicemente “>” nella funzione CountIf con “>=” .

Risorse addizionali

I seguenti tutorial spiegano come eseguire altre attività comuni in VBA:

Come ordinare per data in VBA
Come aggiungere se tra due date in VBA
Come aggiungere giorni fino ad oggi in VBA