In the userform Module I had this code:

'----< Declarations -------------
Dim sh As Worksheet

'----< Code --------------------
Private Sub CommandButton1_Click()
' activate a random sheet
num = Int(Rnd() * Sheets.Count + 1)
Sheets(num).Activate
End Sub

Private Sub CommandButton2_Click()
sh.Activate
Unload Me
End Sub

Private Sub UserForm_Initialize()
Set sh = ActiveSheet
End Sub


works fine for me. I close the form with Commandbutton1

--
Regards,
Tom Ogilvy




"Denny Behnfeldt" wrote in message
...
Thanks for both responses.
For Tom's:
I am getting a "Run Time '91' Error, object variable or With Block
variable
not set". This is when I put "sh.Activate" in the closing code of the
Close
CommandButton I use.

"At the top of userform module" I assume is under (General),
(Declarations).
I understand the logic, but must be missing something.

I tried Robin's solution also, and I don't get an error, but I don't get
the
right sheet selected.

Any ideas what I'm missing?
Denny


"Tom Ogilvy" wrote in message
...
at the top of the userform module

Dim sh as Worksheet

in the initialize event

set sh = Activesheet

in the code that closes the userform

sh.Activate

--
Regards,
Tom Ogilvy

"Denny Behnfeldt" wrote in message
...
I have a Userform that is activated from one toolbar while any of 7
sheets
(MON, TUE, etc.) is active. When the Userform is done doing it's work
and
is
closed, I want to return to the sheet from which it was launched. Any
ideas
on how I would do this?

This newsgroup is incredibly helpful!
Thanks alot,
Denny