Home/ Questions/Q 8674625
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-06-12T19:45:15+00:00

Excuse me, again about COUNTIFS Dim a As String a = ct.Range(B4).Text ‘ B4

  • 0

Excuse me, again about COUNTIFS 

Dim a As String    
a = ct.Range("B4").Text ' B4 is formatted as date
Range("C6").Value = Application.WorksheetFunction.CountIfs(rDat, a, rSec, "1")

rDat and rSec are defined ranges (on another sheet).
rDat has the same format as ct.B4 (i.e. date)
I got “0” as a result, but it is wrong.
I tried to remove date format, and format as text – it works.
But I need date format in rDat and B4.

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team
    Dim a As Date
a = ct.Range("B4") ' do not convert B4 to text
Range("C6").Value = Application.WorksheetFunction.CountIfs(rDat, a, rSec, "1")
    • 0