Sheets("Sheet1").Activate where Sheet1 is the name of the sheet your
are trying to activate. I'm not a VBA expert but it seems redundant
that you have to use the Activate method on the Active Cell. You might
post your message in the microsoft.public.excel.worksheet.programming
forum to get VBA help.

- John