Problème avec removeitem dans un combo
Salut les gars,
Voilà j'ai un usf avec un combobox.
A l'ouverture du usf je rempli ce combo avec
Code:
1
2
3
4
5
6
|
Private Sub UserForm_Activate()
UVitOuiNon.AddItem "Oui"
UVitOuiNon.AddItem "Non"
SpecDebit.AddItem "Non Spécifié"
End Sub |
Par contre, histoire que le combo ne se remplisse pas indéfiniment à chaque réouverture du usf, je voulais décharger le combo. Ce que j'ai fais avec ce code:
Code:
1
2
3
4
5
6
|
Private Sub UserForm_deactivate()
UVitOuiNon.RemoveItem "Oui"
UVitOuiNon.RemoveItem "Non"
SpecDebit.RemoveItem "Non Spécifié"
End Sub |
Ce qui marche très bien si on le ferme avec la croix. Seulement j'ai un bouton "ANNULER" et je voulais aussi décharger le combo avec cette commande, donc j'ai copié le code dans mon événement clic du bouton :
Code:
1
2
3
4
5
6
|
Private Sub annuler_Click()
UVitOuiNon.RemoveItem "Oui"
UVitOuiNon.RemoveItem "Non"
SpecDebit.RemoveItem "Non Spécifié"
End Sub |
Et là j'ai une erreur d'éxécution '-2147024809 (80070057)' : argument non valide avec
Code:
1
2
|
UVitOuiNon.RemoveItem "Oui" |
en surbrillance.
???????????????!!!!:roll::?:(:cry:
