Hallo
Volgende zet via VBA een datumfilter in een tabblad (groter dan die datum) en werkt prima:
wanneer ik een 2e criterium wil meegeven (einddatum), wordt de filter wel correct ingevuld in het tabblad, maar geeft een lege filter (geen gegevens), hoewel er wel gegevens aanwezig zijn tussen die 2 data...
iemand een idee hoe dit komt?
Alvast bedankt.
Mvg
Volgende zet via VBA een datumfilter in een tabblad (groter dan die datum) en werkt prima:
Code:
DatumVanaf = CDate(InputBox("Geef datum VANAF wanneer moet geteld worden dat een PL aan een project gewerkt heeft", "Datum VANAF...", "01/01/2017"))
ActiveSheet.Range("$A$1:$AF$" & LaatsteRij).AutoFilter Field:=12, Criteria1:=">=" & DatumVanaf
wanneer ik een 2e criterium wil meegeven (einddatum), wordt de filter wel correct ingevuld in het tabblad, maar geeft een lege filter (geen gegevens), hoewel er wel gegevens aanwezig zijn tussen die 2 data...
Code:
DatumVanaf = CDate(InputBox("Geef datum VANAF wanneer moet geteld worden dat een PL aan een project gewerkt heeft", "Datum VANAF...", "01/01/2017"))
TotOp = CDate(InputBox("Geef datum TOT wanneer moet geteld worden dat een PL aan een project gewerkt heeft", "Datum TOT...", Date))
ActiveSheet.Range("$A$1:$AF$" & LaatsteRij).AutoFilter Field:=12, Criteria1:=">=" & DatumVanaf, Operator:=xlAnd, Criteria2:="<=" & TotOp
iemand een idee hoe dit komt?
Alvast bedankt.
Mvg