how do I control userform2 on close to show userform 1
Thanks

Put this in Userform2's code module.

Private Sub UserForm_Terminate()
UserForm1.Show
End Sub

Merjet

Thanks much
Curt

"merjet" wrote:

Put this in Userform2's code module.

Private Sub UserForm_Terminate()
UserForm1.Show
End Sub

Merjet

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

Then it seems your original question makes no sense. If Userform1
calls Userform2, then you close Userform2, Userform1 should reappear
(it was simply hidden by Userform2).

Merjet

It says it cannot display all ready shown this is true as 2 is ove top of 1
when closing on x of 2 it goes to las selection of 1 this is error I get.
User form 2 is not as large as 1 this is why both show at same time.
thanks for your responce don't know what yet. will keep trying
Thanks

"merjet" wrote:

Then it seems your original question makes no sense. If Userform1
calls Userform2, then you close Userform2, Userform1 should reappear
(it was simply hidden by Userform2).

Merjet

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

when closing userform 2 it goes to last place that userform 1 was at. That is
if userform1 was in data and button returned to form1 when 2 is called then
closed it returns to data not to form 1. Like to me a lot doesn't make
sense.It does close userform 1 when doing this. do not know why it doesn't
stop on form 1. All ways says 1 all ready displayed.
Thanks Again

"merjet" wrote:

Then it seems your original question makes no sense. If Userform1
calls Userform2, then you close Userform2, Userform1 should reappear
(it was simply hidden by Userform2).

Merjet

Thanks for the explanation

"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

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

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

You make things seem so easy.


Regards,

Alan


"Tom Ogilvy" wrote in message
...
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

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

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

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

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

Thank You for calling me out and makeing me look harder. I had missed a line
of code somehow.
Any way please forgive my ignorance
Thanks Tom

"Tom Ogilvy" wrote:

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

When useing code I am unable to use option buttons on the userform. It
returns to userform 1 as called. When I use an option button this closes the
form The close I am after is with the close button in red box with X
When I use that X button it closes userform 2 and leaves us at last
location. Maybe that is the way it has to be?
Thanks

"Curt" wrote:

Thank You for calling me out and makeing me look harder. I had missed a line
of code somehow.
Any way please forgive my ignorance
Thanks Tom

"Tom Ogilvy" wrote:

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