VBA - Filter Pivot Table based on date range

[AnimalisedZetec1]

Hi Everyone,

I have tried different ways to get a result from this, some got me part of the way there but didn't work complete the task.

I'm trying to use date range from cells D1:D2 (from, until. First date is the 6/10/17(using today formula) and the second date is 10/10/17 (using workday formula)) to filter results in a dropdown list (Dates range).

Unsure how to tackle it!

Any help would be much appreciated!
Thank you in advance!

 

[AnimalisedZetec1]

At the moment i am using this method to select dates:

    ActiveSheet.PivotTables("PivotTable1").PivotFields("Order start date"). _
        CurrentPage = "(All)"
    With ActiveSheet.PivotTables("PivotTable1").PivotFields("Order start date")
        .PivotItems("7/21/2017").Visible = False
        .PivotItems("9/1/2017").Visible = False
        .PivotItems("9/15/2017").Visible = False
        .PivotItems("10/5/2017").Visible = False
        .PivotItems("10/11/2017").Visible = False
        .PivotItems("10/12/2017").Visible = False
        .PivotItems("10/13/2017").Visible = False
        .PivotItems("10/16/2017").Visible = False
        .PivotItems("10/17/2017").Visible = False
        .PivotItems("10/18/2017").Visible = False
        .PivotItems("(blank)").Visible = False
    End With

But this means changing the dates each time it needs using!