Problème avec un UserForm

Bonjour le forum,

Je me permets de vous déranger un petit peu pour un problème que je rencontre et dont je ne trouve pas la solution...

J'essaye de créer un petit outil pour la tournée des calendriers, et je suis confronté à un problème :

Mon UserForm3, me sert à rentrer un nombre (TextBox2) qui me servira à créer automatiquement le même nombre de TextBox sur l'UserForm4.

Tout fonctionne, excepté que les TextBox s'ajoute que lors de la 2ème saisie dans l'UF3.

En gros, je lance l'UF3, je choisi la rue et j'indique 5 dans la TB et je valide. L'UF4 s'ouvre mais il est vide.

Je recommence la manipulation en mettant 8 cette fois-ci, et là, l'UF4 s'ouvre mais avec le nombre de TB de la précédente saisie, soit 5.

Pouvez-vous m'aider s'il vous plait ?

Merci par avance,

Bonjour,

Il te faut seulement décaler l'heure du show ... on démarre le show après la présentation ... n'est-ce pas?

Private Sub CommandButton1_Click()
    Dim j As String
        j = Me.TextBox2.Value
    With UserForm4
        Dim i As Integer
        Dim MyTB As Control
            For i = 1 To j
            Set MyTB = UserForm4.Controls.Add("forms.TextBox.1")
                With MyTB
                    .Name = "TB" & i
                    .Left = 10
                    .Top = 20 * i
                    .Width = 10
                    .Height = 10
                End With
             Next i
         .Repaint
    End With
    Unload Me
    UserForm4.Show  '<<<<  here they are .... 
End Sub

ric

Bonjour ric,

Merci beaucoup ! C'est vrai que vu comme ça, cela parait plus logique...

En tout cas, merci beaucoup pour l'aide !

ric