Hallo zusammen,
ich habe einen Code, mit welchem ich in meiner Pivot Tabelle in der Spalte "RealizedFinishDate" zwischen den Daten aus B1 und B2 filtern kann.
Gerne möchte ich aber, das nun zusätzlich auch noch alle Zellen angezeigt werden, welche den Inhalt "(Leer)" besitzen. Kann mir dabei jemand helfen?
Anbei der Code:
Sub Test2()
Dim Datum1 As String, Datum2 As String, KST1 As String, KST2 As String
Datum1 = Worksheets("Abfrage1").Range("B1").Value
Datum2 = Worksheets("Abfrage1").Range("B2").Value
Worksheets("Abfrage1").PivotTables("PivotTable2").PivotFields("RealizedFinishDate").ClearAllFilters
Worksheets("Abfrage1").PivotTables("PivotTable2").PivotFields("RealizedFinishDate").PivotFilters. _
Add Type:=xlDateBetween, Value1:=Datum1, Value2:=Datum2
End Sub
Vielen Dank im Voraus für eure Hilfe.
Gruß,
Tim