add pages in a multipages programming error 217417418

[albertvb]

I´ve go a control multipage in a use form, and i can add remove page
from this multpage control, and i can too insert comboboxes

to remove -> MultiPage1.Pages.Remove (n)

to add -> MultiPage1.Pages.Add (n)

to insert a textbox TVE(n) = MultiPage2.Pages.Item(n
1).Controls.Add_("forms.textbox.1")

first this you have to dim TVE(n) as control

later to take its value... TVE(n).value or TVE(n).text

I used (n) because i´m inside a for next but any variable is valid.


maybe in this way can you insert any other control

Hello

Im doing my endstudyesproject and it´s not being very easy

I really need help!!!

Im working with excel and a control multipage which change in an use
from with some other controls

I can addd pages
I can remove pages
and i can insert textbox and label box

but I ve go problems insertings pages in this multipage

so please if any body can help me, any help would be really pretty

I ve got problems when I insert pages in this multipages it goes... bu
i tried to make the userform bigger and i ve go an errror

It says something like
error 217417418(80010108)

conexion lost with object library or types library, for remot
proceses
reference will be remove


please if you can help me...

thank you very muc

 

[Guest]

post your code used to make the form bigger;

 

[albertvb]

i have made a lot of changes along the code

so it is a bit difficult to say you exactly which is the new code

but I have "investgated" about it

i open a new userform where I put two multipages and two comandbuttons,
which them can I insert new pages in both multipages, one for each
multipage.

I have vrified that when i have two multipages it gives problems, it
doesn´t work, appers that error 2174....

if i take out anyone of these multipages it works ok, but only with one
of these multipages.

something like this

Private Sub CommandButton1_Click()
k = MultiPage1.Count

If k < 6 Then
For n = 1 To 6 - k
MultiPage1.Pages.Add
Next n

End If

End Sub

Private Sub CommandButton2_Click()

MultiPage2.Pages.Add

End Sub

this example gives the same problem


thank you very much fo your interest

(althjoug I had earlier this problem only with multipages and framebox)