merci à vous pour votre aide
j'ai fini par trouvé mon erreur
il me fallait juste ajouter clng(Date) à 2 endroits
cette version me renvoi désormais le bon résultat :)
Sheets("DashBoard").Range("BU5") = Application.CountIfs(Range("T_Tasks[Due Date]"), ">=" & clng(Date) - Weekday(Date, 2) + 1, Range("T_Tasks[Due Date]"), "<=" & clng(Date) - Weekday(Date, 2) + 7)