Count of Rows in Range ..... does not seem correct

[welchs101]

I have the following macro (see enclosed).

In the macro i attempt to determine the number of rows via these code steps

MsgBox ("rng rows count is     " & rngSourceData.Rows.Count)
MsgBox ("rng cols count is   " & rngSourceData.Columns.Count)

But for some reason the counts are 6 and 6 and i expected 20 and 6.

Any ideas

[welchs101]

any one have any ideas on this one? i am stumped a little on this one.

[watersev]

hi, welchs101, for non-consecutive range you will get only number of rows for the first area (in your case A1:F8) only.

If you wanted to get total number of rows used, there are several options to use, for example:

ws.usedrange.rows.count

result is 20

If you want to count non-blank cells in rngSourceData:

Application.CountA(rngSourceData)

result is 19

[welchs101]

thanks. That is exactly what i wanted to know.......thank you.