Just to add on to what Patrick mentioned..You can try out the below code from
which you can identify where it has gone wrong....or whether the current
region spans to only 1 row...

Msgbox Workbooks(1).Sheets(1).Range("A1").CurrentRegion.a ddress
(External:=true)

If this post helps click Yes
---------------
Jacob Skaria


"Dave" wrote:

Hi,

I am having an issue when I try to counts rows in two separate workbooks. I
am not sure if this is a bug or me. Any assistance would be greatly
appreciated.

In workbook(1)Sheet(1), r is coming up with 1 row when there are actually 64
rows
In workbook(2)sheet(1) s is coming up with 55 rows which is correct.

r = Workbooks(1).Sheets(1).Range("A1").CurrentRegion.R ows.Count
s = Workbooks(2).Sheets(1).Range("A1").CurrentRegion.R ows.Count

I am not sure if I am providing enough information. This code used to work
but has just stopped working yesterday. We are using excel 2003.
--
Thank you

Dave