Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 8
Default Activating the last active worksheet

I hope someone can help me with the following:

I have a macro that needs to jump between two worksheets. If I'm currently
in let's say Sheet "A", and then I activate Sheet "B", what code could I use
to return/reactivate the "last" active worksheet (in this example, go back to
Sheet "A")? (I can not use any sheet name since this will always be
different; also, I can't depend on the position or order of the worksheets).
In other words, I need the code that will take me from my current worksheet
to the worksheet that was active just prior to the sheet where I am now...

Thanks for any help!!
--
Chris M
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 49
Default Activating the last active worksheet

Hi Chris

ActiveWindow.ActivateNext
Brings me back to the last window I was in



"Chris M" wrote:

I hope someone can help me with the following:

I have a macro that needs to jump between two worksheets. If I'm currently
in let's say Sheet "A", and then I activate Sheet "B", what code could I use
to return/reactivate the "last" active worksheet (in this example, go back to
Sheet "A")? (I can not use any sheet name since this will always be
different; also, I can't depend on the position or order of the worksheets).
In other words, I need the code that will take me from my current worksheet
to the worksheet that was active just prior to the sheet where I am now...

Thanks for any help!!
--
Chris M

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 5,302
Default Activating the last active worksheet

Hi Chris,

You could assign the initial worksheet to an object variable and use the
variable to return to the sheet. Something like:

Sub Tester

Dim WS as Worksheet

Set WS = ActiveSheet

' your code to activate another worksheet
' your futher processing code

WS.activate '<<===== Return to base!
End sub

However, vastly perferable would be not to activate various sheets or make
selections. For example, instead of:

'---------------------
Worksheets(2).Activate
Range("A1"").Select
ActiveCell.Value = 5
Worksheets(4).Activate
Range("D10"").Select
ActiveCell.Value = 50
etc.
'-----------------------

Equivalent non selection / non activation code might be:


Worksheets(2).Range("A1"").Value=5
Worksheets(4).Range("D10"").Value=50


Not only is the latter code shorter, easier to maintain and faster, but
there is a reduced processing overhead and you avoid the problem of loosiing
your way - the subject of your post!


---
Regards,
Norman



"Chris M" wrote in message
...
I hope someone can help me with the following:

I have a macro that needs to jump between two worksheets. If I'm
currently
in let's say Sheet "A", and then I activate Sheet "B", what code could I
use
to return/reactivate the "last" active worksheet (in this example, go back
to
Sheet "A")? (I can not use any sheet name since this will always be
different; also, I can't depend on the position or order of the
worksheets).
In other words, I need the code that will take me from my current
worksheet
to the worksheet that was active just prior to the sheet where I am now...

Thanks for any help!!
--
Chris M



Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Activating a Worksheet? Kenny R Excel Discussion (Misc queries) 3 December 8th 06 05:15 PM
activating correct worksheet Robert Christie[_3_] Excel Programming 6 February 14th 05 03:17 PM
Worksheet activating JamesM[_2_] Excel Programming 0 September 28th 04 04:34 PM
Worksheet activating JamesM Excel Programming 0 September 28th 04 03:55 PM
Activating a worksheet DJH Excel Programming 2 August 10th 04 04:20 PM


All times are GMT +1. The time now is 05:22 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"