Set sh = activesheet
For Each sh1 In Worksheets.Count
sh1.ACtivate
Range("A1").Select
Next sh1
sh.Activate

--

HTH

RP
(remove nothere from the email address if mailing direct)


"CassieM" wrote in message
...
I am a newbie. I'm trying to write a macro to loop through all of the
sheets
in a workbook and return the cursor to the home (A1) position. Seems like
it
should be fairly simple to me, but I just can't get it to work. Thanks
for
your help.