Hello friedns;
selects only specified dates in cell G3-G4
does not select date range
19.05.2019 - 21.05.2019 why doesn't choose date between 20.05.2019
please help me
selects only specified dates in cell G3-G4
does not select date range
19.05.2019 - 21.05.2019 why doesn't choose date between 20.05.2019
please help me
Code:
Sub tar()
ActiveSheet.PivotTables("PivotTable1").CubeFields(39).EnableMultiplePageItems _
= True
Tarih = Format(Range("G3"), "yyyy-mm-dd") & "T00:00:00"
Tarih2 = Format(Range("G4"), "yyyy-mm-dd") & "T00:00:00"
ActiveSheet.PivotTables("PivotTable1").PivotFields( _
"[TakvimUL].[Yıl - Hafta - Gun].[Yıl]").VisibleItemsList = Array("")
ActiveSheet.PivotTables("PivotTable1").PivotFields( _
"[TakvimUL].[Yıl - Hafta - Gun].[Hafta]").VisibleItemsList = Array("")
ActiveSheet.PivotTables("PivotTable1").PivotFields( _
"[TakvimUL].[Yıl - Hafta - Gun].[Gun]").VisibleItemsList = Array( _
"[TakvimUL].[Yıl - Hafta - Gun].[Gun].&[" & Tarih & "]", _
"[TakvimUL].[Yıl - Hafta - Gun].[Gun].&[" & Tarih2 & "]")
End Sub