countif comment l'utiliser

Bonsoir à tous,

Je voudrai lancer un calcul conditionnel dans une macro, mais je n'arrive pas à utiliser le countif. Voici le contexte : la macro doit balayer une colonne c et me donner dans une msgbox le nombre de cellule "non vrai" et si le résultat est différent de 0 arreter la macro, en sachant que cette colonne n'est sensé ne contenir que des "vrai".

Merci pour votre aide :oops:

Petit complément qui à son importance, il faut que la macro balaye la colonne c jusqu'à la 1ere ligne vide.

Bonjour,

Comme cela peut etre

Code:

---

If Application.WorksheetFunction.CountIf(Range("C:C"), "non vrai") > 0 Then Exit Sub

---

EDIT : si la colonne C contient un titre

Code:

---

If Application.WorksheetFunction.CountIf(Range("C1:C" & Range("C65536").End(xlUp).Row), "non vrai") > 0 Then Exit Sub

---

Merci pour ton aide, la macro ne s'arrete pas, elle continue sa vie !!
Et je n'ai pas le résultat dans la msgbox.

Ma proposition sort de la procédure si le nombre de cellule avec le texte "non vrai" dans la colonne C est supérieur à 0.
Reste a savoir si "non vrai" ne serait pas plutôt le booléen FAUX. Si c'est cela, remplace "non vrai" par False

Merci l'arret fonctionne. :ccool:

Ou dois je placer msgbox "Il reste des lignes erronnées" dans le dode que tu m'as donné !! :D

J'ai trouvé :ccool:

Merci beaucoup pour ton aide

Ici

Code:

---

1 2 3 4

If Application.WorksheetFunction.CountIf(Range("C1:C" & Range("C65536").End(xlUp).Row), "non vrai") > 0 Then Msgbox "Il reste des lignes erronnées" Exit Sub end If

---