Dear experts,
I have a multipage form, and I would like to put a button
on page 6 that redirects the user to page 4.
How can I achieve this?
Many thanks in advance!
Best regards,
Valeria

On Sat, 24 Jan 2004 00:51:55 -0800, "Valeria"
wrote:

Dear experts,
I have a multipage form, and I would like to put a button
on page 6 that redirects the user to page 4.
How can I achieve this?

If I understand you correctly, you can do this:

- Put a command button on page 6.
- Double click on that button to open the code module, and that
command button's Click event.
- Put the following code in there. Change the control names to:
* The name of your user form; and
* The name of your multipage control. I've left the default names in
for illustration only.
DON'T change the value. It's 3 because the multipage index starts
counting from 0. (Page1 = 0, Page2 = 1 and so on.)

Private Sub CommandButton1_Click()

UserForm1.MultiPage1.Value = 3

End Sub


---------------------------------------------------------
Hank Scorpio
- Yes, yes, I know I've been missing for a while. Long story. And don't
ask what the size of my inbox is at the moment either... 8^
scorpionet who hates spam is at iprimus.com.au (You know what to do.)

Many thanks,
that's exactly what I needed!
Kind regards,
Valeria

-----Original Message-----
On Sat, 24 Jan 2004 00:51:55 -0800, "Valeria"
wrote:

Dear experts,
I have a multipage form, and I would like to put a
button
on page 6 that redirects the user to page 4.
How can I achieve this?

If I understand you correctly, you can do this:

- Put a command button on page 6.
- Double click on that button to open the code module,
and that
command button's Click event.
- Put the following code in there. Change the control
names to:
* The name of your user form; and
* The name of your multipage control. I've left the
default names in
for illustration only.
DON'T change the value. It's 3 because the multipage
index starts
counting from 0. (Page1 = 0, Page2 = 1 and so on.)

Private Sub CommandButton1_Click()

UserForm1.MultiPage1.Value = 3

End Sub


---------------------------------------------------------
Hank Scorpio
- Yes, yes, I know I've been missing for a while. Long
story. And don't
ask what the size of my inbox is at the moment either...
8^
scorpionet who hates spam is at iprimus.com.au (You know
what to do.)
.