La partie du code ci-dessous fonctionne. Mais je ne voudrais pas préciser dans le countif la plage de cellule (ici h10:h1956). Je voudrais que ce soit la plage de cellule de la ligne set graphdata. Vous savez comment l'écrire?
Merci
Set graphdata = Sheets("saisie").Range(Cells(ligne + 3, Colonne), Cells(ligne + 1949, Colonne))
Feuil2.Select
Range("o1").Select
ActiveCell.FormulaR1C1 = WorksheetFunction.CountIf(Worksheets("saisie").Range("h10:h1956"), "a")
Je me réponds à moi même. J'avais fait une erreur de saisie...
la réponse est :
Set graphdata = Sheets("saisie").Range(Cells(ligne + 3, Colonne + 1), Cells(ligne + 1949, Colonne + 1))
Feuil2.Select
Range("o1").Select
ActiveCell.FormulaR1C1 = WorksheetFunction.CountIf(graphdata, "a")