Fonction Countif par macro

[jofdm]

Bonjour à tous,

Je cherche à utiliser la fonction Countif en VBA mais je ne sais pas quelle syntaxe utiliser.
Le but est de trouver le nombre de fois où est écrit OK dans la plage de valeurs A1 à Ax où x est variable.

Merci d'avance pour votre aide

 

[Efgé]

Re : Fonction Countif par macro

Bonjour jofdm
Je me lance (l'emploi des formules par VBA est une première pour moi 😉)

Sub test()
With Sheets("Feuil1")
    Set Data = .Range(.Cells(1, 1), .Cells(Rows.Count, 1).End(xlUp))
End With
Résultat = Application.Evaluate("CountIf(" & Data.Address & ", ""Ok"")")
MsgBox Résultat
End Sub

Cordialement

P.S merci à David84

 

[fhoest]

Re : Fonction Countif par macro

Bonjour à vous deux
pour le même genre discutions récente
https://www.excel-downloads.com/threads/calcul-nombre-de-cellule-sans-couleur.163026/
A+

 

[xyam]

Re : Fonction Countif par macro

Bonjour à tous
J'étais vraiment coincé avec les NB.SI ou Countif
Merci Efgé tu m'as bien aidé 😉