Syntaxe Countifs

Bonjour,

J'essaye d'utiliser countifs avec 2 critères, comptez les cellules qui contiennent "P" et les cellules vides dans une page données, j'ai ce code mais il ne fonctionne pas et je ne comprend pas pourquoi :

Option Explicit
Sub test()
Dim capa As Integer
capa = WorksheetFunction.CountIfs(Sheets("Présence").Range(Cells(10, 22), Cells(10, 34)), "P", "") 'message d'erreur ici
MsgBox (capa)
End Sub

Le code fonctionne si je ne mets qu'un argument, ma question est donc comment en mettre plusieurs ?

Le message d'erreur :

Erreur d'exécution 1004

Impossible d'exécuter la propriété CountIfs de la classe WorksheetFunction

J'ai de nouveau le même problème, personne n'a d'idée ?

Bonjour GhorghorBey64, le forum

En rusant un peu, ça reste du "bricolage" mais ça fonctionne

En attendant qu'un pro du forum intervienne

Merci de ton aide, c'est ce que j'ai fait aussi mais j'aurais voulu savoir comment utiliser countifs dans le cas ou j'aurai beaucoup d'arguments et simplement pour savoir l'utiliser aussi.