View Single Post
  #16   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default Userform direction

I posted tested code that worked. The code you show here looks nothing
like it, so it would be silly just to repost the same answer I gave.

--
Regards,
Tom Ogilvy

"Curt" wrote in message
...
close button I now have it so when I call userform 2. 1 is gone from
screen.
I however can not seem to get it to reload user 1 on close.Private Sub
UserForm_Click()
Call UserForm
Userform1.Show
Unload UserForm2
End Sub
I've played all around with this to no avail
any ideas I can leave as is but would like userform 1 to reapear.
Thanks for info re button.



"Tom Ogilvy" wrote:

That is fine. then you don't need this code in Userform 2


Private Sub CmdClose_Click()
Unload userform2
End Sub

--
Regards,
Tom Ogilvy

"Curt" wrote:

Not sure button I use is on user form I did not put it there. I feel it
is
part of form. Not sure how to change it. It is the close x in red box.
Thanks

"Tom Ogilvy" wrote:

Private Sub OptionButton27_Click()
OptionButton27.Value = False
Userform1.Hide
UserForm2.Show
Userform1.Show
End Sub

This is from 2

Private Sub CmdClose_Click()
Unload userform2
End Sub

replace cmdclose with the button that you use to close userform2.

--
Regards,
Tom Ogilvy


"Curt" wrote in message
...
Userforms only move you to different wksheets. data is then entered
onto
wksht then a button to return to userform so no data is being
handles on
the
user forms I have tried to hide and show one hide locked up excel.
so I am
having fun HAHA.
this is try from userform 1
Private Sub OptionButton27_Click()
OptionButton27.Value = False
'Userform1.Hide
UserForm2.Show
'Userform1.Hide
'OptionButton27.Value = False
Userform1.Hide
End Sub
This is from 2
Private Sub UserForm_Click()
Userform1.Show
End Sub
' Private Sub UserForm_Terminate()
' Userform1.Show
' End With
' End Sub
'End Sub
As you see I've tried stumped for now
Thanks Again

"Alan" wrote:

If the two are stacked, you are not unloading your Userform1
before
showing
Userform 2.

If you are not unloading Userform1 then I presume you are using
Userform1
to
load Userform2 to get data to fill Userform1. (If not, then you
are going
about this all wrong.) To regain focus on Userform1 you must have
change
event code in Userform2 that populates the data into Userform1
then
closes
Userform2. This will allow Userform1 active to continue. I like to
place
an
OK button on a userform to use that to fill data, open and close
Userforms.

Me.Hide, will hide Userform1 till you call it to show in your
Userform2
change event.

Regards,

Alan


"Curt" wrote in message
...
says it can't show all ready displayed. userform 2 is called
from 1 and
does
apear on top of 1
Curt

"merjet" wrote:

Put this in Userform2's code module.

Private Sub UserForm_Terminate()
UserForm1.Show
End Sub

Merjet