Bonsoir à tous,

J'ai inséré dans ma feuille excel une zone de liste déroulante ActiveX via insertion/mode de création et je souhaiterais n'avoir que quatre choix dans cette liste ; j'ai donc écrit le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub frequence_Change()
 
    With Me.frequence
 
    frequence.AddItem "Annuelle"
    frequence.AddItem "Semestrielle"
    frequence.AddItem "Trimestrielle"
    frequence.AddItem "Mensuelle"
 
    End With
 
End Sub
Le code fonctionne mais dès lors que je l'exécute en choisissant par exemple "Annuelle", les quatre choix sont rajoutés dans la liste, ce qui allonge la liste à chaque exécution.

J'ai essayé de rajouter la ligne :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
frequence.clear
au début du code mais ça ne change rien ; et en cliquant sur un des choix, le résultat ne s'affiche même plus.

Quelqu'un aurait-il une idée ?

D'avance merci