Hi,

I am using a multipage on one of my forms because I think they allow good navigation. My multipage is composed of 3 pages, and based upon information provided on the first two pages, I want to show a default value on a text box in the third page.

Does anyone know of a way that makes calculations and updates this text box if the tab of the third page is clicked on? I was thinking of using Private Sub MultiPage1_Change(), but this will make my program very slow because that means there will be calculations everytime something is changed.

Thank you very much!

You'd have to check it's value when the multipage was changed to a different page. Note that values start at 0 so a value of 0 would be page 1, 1 would be page 2, 2 would be page 3, etc.

I used the on click routine of the multipage itself but there are other ways to trigger it. It can be limited by exiting the sub for any page clicked that isn't the page you want.

For instance:

--------------------------------------------------
Private Sub MultiPage1_Click(ByVal Index As Long)

  If MultiPage1.Value <> 2 Then exit sub
  MsgBox "Yes, I will calculate"

End Sub
--------------------------------------------------

Hope this helps you.

Thank you allenm, but now I get an error message that I don't understand.

Here are bits and pieces of my code:


'These constants help with multipage navigation
Const mpProjDim As Integer = 0
Const mpOptions As Integer = 1


Private Sub MultiPage1_Change()
 With MultiPage1
   If .Value = mpOptions Then
        Call myFunction
   End If
 End With
End Sub

Sometimes the code works, but other times I get: "Compile Error: Constant expression required" - there's a problem with the line " .Value = mpOptions ", but I am not sure what. I don't get the error message if I declare mpOptions as a Dim and assign the value when the userform is loaded, but I thought it's stylistically better to declare it as Const.

Hmmm.... from what you've listed, that should work...
Where are you declaring the constant at? At the very top with Option Explicit?

You may also try declaring it in a module. Don't see why you should have to though.

Is there more than one place where you're declaring this? Could be the interpreter is getting confused. I'd really need more to go on. I'll try it with constant declaration myself later when I get the chance and post if I find anything odd.

I declared my constants at the top, right after Option Explicit. I think it might be a run-time error since sometimes I don't get the message. Thank you for your help.

I pasted your code exactly making a myfunction that notified me that it was called and tried several times including with other things opened and never received an error running it. Not sure why, given just the code above, you're getting that error.