Discussion :

[BDA53]

à tous la communauté de VBA !

Dans le cadre de la création d'un outil de programmation pour des utilisateurs ne connaissant pas VBA,
je souhaite ajouter des valeurs dans une liste déroulante.
Avec une condition, l'utilisateur doit saisir dans une zone de texte d'un formulaire la valeur qu'il veut ajouter.
Ce formulaire, va ajouter une valeur dans une "plage excel" définie pour la liste déroulante.
J'ai réalisé ce programme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub TextBox2_Change()
    Dim ligne As Integer
    Dim compteur As String
    compteur = TextBox2.Value
    For ligne = 18 To 100
        If IsEmpty(Worksheets(1).Cells(ligne, 6)) Then
            Worksheets(1).Cells(ligne, 6) = compteur
            Exit Sub
        End If
    Next ligne
End Sub

NB : compteur est le nom d'une personne et non un compteur numérique pour une boucle

Du coup, si je décide de lancer le programme, et de rentrer la valeur "HARRY COVERT", le programme va ajouter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
H
HA
HAR
HARR
HARRY
HARRY 
HARRY C
HARRY CO
HARRY COV
HARRY COVE
HARRY COVER
HARRY COVERT

Je ne sais pas si c'est parce-qu'on est lundi matin, mais actuellement je ne vois pas comment faire pour n'avoir qu'une seule valeur.
Je ne dois surement pas utiliser la bonne méthode de raisonnement pour cet algorithme.
Quelqu'un peut-il m'aider please ?

[Menhir]

Ton problème est dans la première ligne : TextBox2_Change()
Chaque fois que tu ajoutes un caractère, la macro est activée.

Pourquoi ne pas faire un simple ImputBox avec une macro activée par un bouton ?

[BDA53]

J'ai pensé à cette approche mais si je remplace par un inputbox ça ne va pas me faire le même affichage ?

[jeanmidudu]

Pourquoi ne pas utiliser un bouton "valider" sur lequel l'utilisateur devra cliquer pour demander l'intégration du contenu?

[BDA53]

C'est une bonne idée.

J'ai trouvé une solution pour ce problème.
Je suis passé par des "checkbox" pour afficher des imputbox pour chaque liste déroulante.
Et effectivement, je n'ai pas de problème avec les imputbox.
Car ça ne référence pas de macro liée au changement dans une zone de texte.

Merci pour vos réponses ça m'a beaucoup aidé