Créer objet dans un multipage

Bonjour,

Nous travaillons sur Visual Basic Editor depuis Excel et nous aimerions savoir comment réaliser la fonction suivante:

Dans un multipage un utilisateur rempli un TextBox à la page 1 et il faudrait utiliser la valeur rentrée notée x dans ce TextBox pour créer x fois un ComboBox + TextBox sur la page 2 du MultiPage.

Doit-on avoir forcément un bouton sur la page 1 pour réaliser cette fonction? Ou alors cette action peut-elle être réalisée au changement de page?

Pour l'instant, voici notre code

Private Sub Ok_Click()

Dim Pge As Page
Dim Frme As Control, TxtB As Control
Dim x As Byte, j As Byte, i As Byte

If Box_Text_Nb_Materiaux = "" Or Not IsNumeric(Box_Text_Nb_Materiaux) Then Exit Sub

x = Box_Text_Nb_Materiaux
Set Pge = Me.MultiPage1.Pages(1) '2eme page du multipage
For j = 1 To x 'boucle pour créer les frames

    Set Frme = Pge.Controls.Add("Forms.Frame.1")

    With Frme
    .Left = 10 + ((j - 1) * 100)
    .Top = 10
    .Width = 90
    .Height = 250
    End With

    For i = 1 To 5 'boucle pour créer les Textbox
        Set TxtB = Frme.Add("forms.Textbox.1")
        With TxtB
        .Left = 5
        .Top = 10 + ((i - 1) * 50)
        .Width = 75
        .Height = 30
        End With
    Next i
Next j

End Sub

mais l'erreur "incompatibilité de type " apparait pour la ligne "Set Pge = Me.MultiPage1.Pages(1) '2eme page du multipage"

merci à tous

Bonsoir

pourtant ci-dessous ça avait l'air de marcher...

@ bientôt

LouReeD