Selection.End(xlDown).Row

and

Selection.End(xlToRight).Column

--

HTH

Bob Phillips

(remove nothere from the email address if mailing direct)

"Shinya Koizumi" wrote in message
...
How to find out the maximum row and col in the current worksheet without
going to the actual cell?

I know if i actually go to the last cell i can find out.

Selection.End(xlToRight).Select