"Joel" wrote in message
...
I noticed something unusual with my excel. I selected on a blank workbook
cell A1 and went to Edit Menu - GOTO - SPECIAL - Lastcell. The cell
selected is
H16. Nothing is in H16. I tried to clearcontentts of H16 with no luck.
I
do the same thing on sheet 2 and the last cell is A1.

When using your code I found the UsedRange was selecting a larger area
than
the actual cells that had data. No sure why. Here is tthe code I used
(added
three lines). Step through code and check if objsht.UsedRange.Select is
selecting the same area on the two PCs.


Hi Joel, many thanks for responding.

I added this line

objsht.UsedRange.Select

after

Set objRange = objXL.Intersect(objSht.Range("K2:IV65536"), objSht.UsedRange)
'Start from Row 2

and it works fine on the other PC now. If only I knew why ;-)

Thanks again.

Regards,
Keith.