re bonjour à tou(te)s,

je n'arrive pas à comprendre où est mon erreur dans ce code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub test()
Dim lg As Integer, s
With Sheets("saisies")
lg = .Range("a5000").End(xlUp).Row
s = Application.WorksheetFunction.SumIfs(.Range("f3:f" & lg), .Range("b" & lg), "CPTE COURANT", _
.Range("a3:a" & lg), "<=Application.WorksheetFunction.EoMonth(Date, 0)")
MsgBox s
'sachant que ".Range("f3:f" & lg)" somme de valeur à effectuer
'sachant que ".Range("b" & lg)" 1ère plage a analyser
'sachant que ".Range("a3:a" & lg)" colonne au formatdate jj/mm/aaaa
 
End With
End Sub
je me retrouve avec une erreur 1004, impossible de lire la propriété sumifs de la classe worksheetfunction

Alors si une bonne ame pouvait se pencher sur mon problème, merci d'avance