Initializing UserForm which uses MultiPage controls, part 2

[Patrick Simonds]

I posted the question below earlier, and both Tom Ogilvy and Dave Peterson
were kind enough to reply. Unfortunately their solution did not work. In the
interest of brevity in my prior post I am sure that I could have provided
more useful information. I was going to attch the workbook, but could not
get it down to a small enough size to send to the newsgroup. I would be more
than happy to e-mail this out if someone would be willing to take a look.




I am having a problem Initializing my UserForm which has on it 2 MultiPage
controls. Before I added the second MultiPage control (which is located on
Page2 of MultiPage1) everything worked fine. Now when I try to open the
UserForm I get Object not found errors. I assume I must some how account for
the second MultiPage control in the "With" statement, but nothing I have
tried works.


With Me.MultiPage1
.Value = .Pages(myMPPageName).Index
End With


Private Sub UserForm_Initialize()

'This macro intializes the Data Input UserForm


With Me.MultiPage1
.Value = .Pages(myMPPageName).Index
End With

'Populates the End of Period Data on MultiPage1

TextBox1.Text = Worksheets("Audit Report Page 1").Range("E4").Text
TextBox2.Text = Worksheets("Audit Report Page 1").Range("E7").Text
TextBox3.Text = Worksheets("Audit Report Page 1").Range("E8").Text

'Populates Outstanding Checks on MultiPage1

TextBox8.Text = Worksheets("Outstanding Checks").Range("A5").Text
TextBox9.Text = Worksheets("Outstanding Checks").Range("B5").Text
TextBox10.Text = Worksheets("Outstanding Checks").Range("C5").Text

'Populates January Income on MultiPage2

TextBox80.Text = Worksheets("Income").Range("B3").Text
TextBox81.Text = Worksheets("Income").Range("C3").Text
TextBox82.Text = Worksheets("Income").Range("D3").Text

 

[Tom Ogilvy]

(e-mail address removed)