Définir une condition

[Pierrot]

Bonjour à tous.

Je voudrais définir les deux lignes suivantes comme ci dessus de façon à me faire deux conditions en fonction des cases cochées, afin d'afficher les filtres adéquates dans une listbox.
Bien sur la solution la plus simple est de tout détaillé mais j'aurais voulu essayer de recompacter un peu tout ça.

ex:
If CheckboxMois=true then
condition=Mid(i.Offset(0, Col2), 4, 2) = Filtre2 And i.Offset(0, Col3) > Filtre3
else
condition=Filtre2 And i.Offset(0, Col3) > Filtre3
end if
.....
.....

end sub

Comment puis-je faire pour que cela marche.

Merci d'avance.

 

[Hervé]

bonjour,

as tu essaye de les imbriquer?
du style

if condition1 then
if condition2 then
.....action si 1 et 2
end if
else
.....action si 1 seul
end if

ainsi, si ta condition 1 est rempli, tu teste ta deuxieme condition et tu fais une action et sinon tu fais une autre action...

esperant t'avoir aidé,

@+, Hervé

 

[Pierrot]

Salut Hervé.

En fait mon problème est de définir la condition, car la ligne suivante ne fonctionne pas, vu qu'il y a deux =. je voulais donc savoir comment je pouvais créer cette condition.

condition=Mid(i.Offset(0, Col2), 4, 2) = Filtre2 And i.Offset(0, Col3) > Filtre3


Pierrot