how to return set a cell value equals to last non-blank row number?

[fuduo210]

Anyone know how to write a code for getting a cell value that is the same to the last non-blank row number? ie. F1 = 233. To which 233 is the last row has value

 

[kadeo]

Range("F1").Value = Range("A" & Rows.Count).End(xlUp).Row

'F1' is the cell that you want the result in.
'A' is the column you want to test that will have the last row of data in it.

There is another way using the usedrange property of xlspecialcells but it has problems concerning what exactly constitutes part of the usedrange.

 

[kevatarvind]

pls give some more example not getting what you actually need