WorksheetFunction Calculation Error

  • Thread starter Thread starter Ayo
  • Start date Start date
A

Ayo

errorWS.Range("B3").Value = Application.WorksheetFunction.CountA("A5:A" &
errorWS_startRow - 1)

The above line of code is always 1, even when errorWS_startRow is much > 1,
i.e:
errorWS_startRow=144, 749 etc.

Any ideas what is going on?
 
I'd suggest including the sheet reference for the CountA; something like this
(untested)

errorWS.Range("B3").Value =
Application.WorksheetFunction.CountA(errorWS.Range("A5:A" &
errorWS_startRow - 1))
 
If the cells from A5 to A & errorWS_startRow-1 are empty, you will get
either 1 or zero depending on whether there is data in the startRow - 1 or
not. CountA only counts cells with data that has a value. It will not
count empty cells but does count cells with zero, "" or ' characters that
are hidden because they have values. So, the range you are testing must be
empty except for one cell.
 
Back
Top