MultiPage

[waggy30]

Hello
Does anyone know how I would disable a page in a multipage?

[waggy30]

Or does anyone know how to simply refer to a page in a multipage?

[Russell Hauf]

Try

MultiPage.Value

-rh

[Russell Hauf]

On 2002-03-11 13:45, waggy30 wrote:
Hello
Does anyone know how I would disable a page in a multipage?

You can hide a page if you like:

MultiPage1.Pages(1).Visible = False

Would hide the second page (multipage pages are zero-based).

Hope this helps,

Russell

[waggy30]

Sorry didn't explain myself properly. What i want is to refer to the enabled property of a page in a multipage. I've tried

multipage1.page1.enabled = False

but it doesn't work. Any ideas?

[waggy30]

Russel i used your code, and used it in mine

Private Sub UserForm_Initialize()
If Range("route") = "1" Then
MultiPage1.Pages(0).Visible = False
Else
MultiPage1.Pages(1).Visible = False
End If
End Sub

And i get run-time errors. Any idea why?

[Russell Hauf]

On 2002-03-11 14:26, waggy30 wrote:
Russel i used your code, and used it in mine

Private Sub UserForm_Initialize()
If Range("route") = "1" Then
MultiPage1.Pages(0).Visible = False
Else
MultiPage1.Pages(1).Visible = False
End If
End Sub

And i get run-time errors. Any idea why?

It could be in your "Range" reference. You need to precede it with the sheet. For example,

Sheets("Sheet1").Range("route")

Hope this helps,

Russell

[ This Message was edited by: Russell Hauf on 2002-03-11 17:43 ]

[Russell Hauf]

On 2002-03-11 14:26, waggy30 wrote:
Russel i used your code, and used it in mine

Private Sub UserForm_Initialize()
If Range("route") = "1" Then
MultiPage1.Pages(0).Visible = False
Else
MultiPage1.Pages(1).Visible = False
End If
End Sub

And i get run-time errors. Any idea why?

What is the exact error and where is it happening (hit debug when you get the error to find out)?