Pivot table variable problem

[van_65166]

Hello

Is it possible to make the date part variable in the vba code below? I would like your help.

ActiveSheet.PivotTables("PivotTable1").PivotFields("Yaratma tarihi"). _
PivotFilters.Add2 Türü:=xlBefore, Değer1:="20.01.2025"

sample file

https://drive.google.com/file/d/13VItbEzEhqrXsnRkwhjk92WF0IuyR7nH/view?usp=sharing