bonsoir à tous
voila le petit probleme .
j'ai plusieurs combobox qui sont initialise par le code suivant

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim jj As Integer 'debut de la procedure pour eliminer les doublons 
For jj = 2 To Sheets("course").Range("G65536").End(xlUp).Row
ComboBox3 = Sheets("course").Range("G" & jj)
If ComboBox3.ListIndex = -1 Then ComboBox3.AddItem Sheets("course").Range("G" & jj)
Next jj 'fin de la procedure doublon
seulement à l'ouverture du fourmulaire je souhaiterai que le contenu des combobox concernes soient ="tout". seul une action par l'utilisateur qui va selectionner le combobox considere aura acces alors au divers choix repris par le code ci-dessus.

Tout cela dans le but de faire le test suivant
combobox1.value ="tout" et combobox2.value="animaux" et combobox3.value="tout"then
intruction
end if

je precise que "tout" signe que qql soit la valeur trouvée, la comparaison dans le test sera " toujours VRAI"

bon j'espere avoir ete le plus clair possible

merci d'avance
.