Bonjour à tous,

Je fais mes débuts en matièere de programmation VBA sur Excel. Je suis confronté depuis ce matin à un problème que j'arrive pas à résoudre.

J'ai un formulaire avec un bouton qui doit me permettre de créer un textbox chaque fois qu'il est activé. Les texbox doivent s'enchainer un à la suite de l'autre

voici ce que j'ai fait pour le moment
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Dim TexteBox(0 To 100) As MSForms.TextBox
 
Private intcpt As Integer
 
'Bouton permettant d'ajouter des contrôles
Private Sub btnAjouter_Click()
    TexteBox(intcpt) = 'J'ai pas trouvé comment instancié l'objet
    TexteBox(intcpt).Left = 10
    TexteBox(intcpt).Top = intcpt + 10
 
    Dim i As Integer
    For i = 0 To intcpt
    Set TexteBox(intcpt) = Me.Frame1.Controls.Add("Forms.TextBox.1", , True)
    Next
 
    intcpt = intcpt + 1
 
End Sub
évidement ce code la fonctionne pas. J'aimerai que vous m'aidiez à le compléter

Merci beaucoup de votre aide, je commence a désespéré