Bonjour a tous ,
Je cherche à filtrer tous les TCD de mon classeur entre 2 dates , mais malheureusement quand j 'exécute ma macro , je tombe sur l'erreur "1004"" La méthode ADD2 de l'Objet Pivotfilters a échoué "
Est ce qu'il serait possible de m'aider à résoudre ce problème .
Je vous remercie d'avance .
Je cherche à filtrer tous les TCD de mon classeur entre 2 dates , mais malheureusement quand j 'exécute ma macro , je tombe sur l'erreur "1004"" La méthode ADD2 de l'Objet Pivotfilters a échoué "
Est ce qu'il serait possible de m'aider à résoudre ce problème .
Je vous remercie d'avance .
VB:
Sub actiu()
Dim Sheet As Worksheet, pi As PivotTable, pd As PivotField
Dim pvI As PivotItem
For Each Sheet In ThisWorkbook.Worksheets
For Each pi In Sheet.PivotTables
Set pd = pi.PivotFields("date annonce")
pd.ClearAllFilters
pd.PivotFilters.Add2 Type:=xlDateBetween, Value1:="04/01/2014", Value2:= _
"12/01/2019"
Next
Next
End Sub