VBA et pivot Table

Bonjour à tous,

J'aurais besoin d'un petit coup de main si possible.

L'un d'entre vous peut-il m'indiquer comment modifier le code suivant pour permettre de sélectionner dans un filtre du Pivot table une plage de date allant de StartDate à Enddate ?

( A noter que le filtre n'est ni en colomne ni en ligne => impossible d'utiliser les Date filters Between Value 1 - Value 2 )

Sub test ()
Dim Startdate as String

DIm Enddate as String
Startdate = Sheets("Bonjour").Range("E2")

Enddate = Sheets("Bonjour").Range("E3")
'

ActiveSheet.PivotTables("PivotTable2").CubeFields(706).EnableMultiplePageItems _
= True
ActiveSheet.PivotTables("PivotTable2").PivotFields( _
"[blabla Date Time].[SVC Booking Date].[blabla Date]"). _
VisibleItemsList = Array( _
"[blabla Date Time].[blabla Date].&[2021-02-14T00:00:00]", _
"[blabla Date Time].[blabla Date].&[2021-02-15T00:00:00]", _
"[blabla Date Time]. [blabla Date].&[2021-02-16T00:00:00]", _
"[blabla Date Time].[blabla Date].&[2021-02-17T00:00:00]")

End Sub

Le profil de la date avec les 00:00:00 est malheureusement une donnée et je ne peux rien y faire

Dans le code ci-dessus les dates ont été selectionnées manuellement une par une avec enregistreur de macro ... J'aimerais l'adapter pour que toutes les dates reprises dans l'interval StartDate - Enddate soient prises en compte

Merci d'avance !

Bonne journée,

Vbabeginner