VBA / Fonction CountIf

Bonjour,

J’essaie d’obtenir avec une fonction VBA le même résultat que j’obtiens par formule dans la cellule B16, mais ça coince : le résultat est toujours 0 au lieu de 12

Savez-vous comment je dois corriger mon code ?

Cordialement.

Bonjour

Tu y étais presque ...

MsgBox ("Avec WorksheetFunction = " & WorksheetFunction.CountIf(Range("B2:B15"), ""))

Bonne journée

Amicalement

Superbe, merci pour ta solution

J'avais recopié un peu trop fidèlement (ou bêtement) le résultat obtenu en enregistrant l'inscription de cette formule

    Range("B16").Select
    ActiveCell.FormulaR1C1 = "=COUNTIF(R[-14]C:R[-1]C,"""")"

Bonne fin de journée.