Mise a jour automatique d'un combobox lié a un fichier .txt

[Résolu]
Signaler
Messages postés
180
Date d'inscription
vendredi 18 janvier 2008
Statut
Membre
Dernière intervention
22 novembre 2013
-
Messages postés
180
Date d'inscription
vendredi 18 janvier 2008
Statut
Membre
Dernière intervention
22 novembre 2013
-
Bonjour à tous!

la question est dans le titre, mais j'explique quand même un peu!

j'ai créé un userform dans lequel j'ai un combobox, un textbox et un commandbutton.
Lorsque l'utilisateur entre un nom dans le textbox et qu'il clique ensuite sur le bouton, l'information est enregistrée
dans un fichier .txt.

j'ai aussi un combobox qui est lié à la liste des noms du fichier.txt malheureusement le combobox ne se met pas à jour automatiquement. donc lorsque l'utilisateur entre un nouveau nom, il est bien enregistré dans le fichier.txt mais il n'apparait pas dans le combobox. Il faut fermer le UserForm et le relancer...

Est-il possible de faire une mise à jour automatique?

je vous laisse ci-dessous le code:

Private Sub UserForm_Activate()
'ouverture du fichier et lecture ligne par ligne
Open "C:\essai.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, ligne$
ComboBoxNom.AddItem Mid(ligne$, 1)
Loop
Close #1
End Sub





Private Sub CommandButtonEnregistrer_Click()
Dim texte
texte = TextBoxNom.Text
Open "C:\essai.txt" For Append As #1
Print #1, texte
Close #1
TextBoxNom.Text = ""
End Sub

2 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Salut,
Il te suffit au moment ou tu enregistre le nom dans le fichier, de l'ajouter à la combo box.

Private Sub CommandButtonEnregistrer_Click()
Dim texte As String
   texte = TextBoxNom.Text
   Open "C:\essai.txt" For Append As #1
       Print #1, texte
   Close #1
   Call ComboBoxNom.AddItem(texte)
   TextBoxNom.Text = vbNullString
End Sub , ----
[code.aspx?ID=41455 By Renfield]

Je pense que cela devrait repondre à tes attentes

@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
180
Date d'inscription
vendredi 18 janvier 2008
Statut
Membre
Dernière intervention
22 novembre 2013

Merci!!!!!

et merci aussi de corriger les autres petites erreurs de mon code!