Macro to return to Current Sheet and Cell

I have a macro that is used in several different areas in my workbook. The
macro changes values in several sheets from the sheet I'm on...and that all
works.

I'd like the macro to return me to whatever active sheet and cell I am
currently at....how can I accomplish this?

Thanks
Steve

--


----------------------------------------------------
This mailbox protected from junk email by MailFrontier Desktop
from MailFrontier, Inc. http://info.mailfrontier.com

'Place this at the start of your macro.....

Dim wb as workbook
Dim ws as worksheet
Dim c as range

set wb=activeworkbook
Set ws=wb.activesheet
set c=activecell

'Your code here

'Place this at the end of your macro.....
wb.activate
ws.select
c.select


--


XL2003
Regards

William
[email protected]


"Steve Klenner" <[email protected]> wrote in message
news:%[email protected]...
>I have a macro that is used in several different areas in my workbook. The
>macro changes values in several sheets from the sheet I'm on...and that all
>works.
>
> I'd like the macro to return me to whatever active sheet and cell I am
> currently at....how can I accomplish this?
>
> Thanks
> Steve
>
> --
>
>
> ----------------------------------------------------
> This mailbox protected from junk email by MailFrontier Desktop
> from MailFrontier, Inc. http://info.mailfrontier.com
>
>

Hi Steve:

In Addition to William's suggestion, try amending your code to avoid sheet
and range selections: most manipulation can be effected without making such
selections.

---
Regards,
Norman



"Steve Klenner" <[email protected]> wrote in message
news:%[email protected]...
>I have a macro that is used in several different areas in my workbook. The
>macro changes values in several sheets from the sheet I'm on...and that all
>works.
>
> I'd like the macro to return me to whatever active sheet and cell I am
> currently at....how can I accomplish this?
>
> Thanks
> Steve
>
> --
>
>
> ----------------------------------------------------
> This mailbox protected from junk email by MailFrontier Desktop
> from MailFrontier, Inc. http://info.mailfrontier.com
>
>