Dag dino, ik had liever gewoon tekst gehad dan een afbeelding maar goed, ik doe een poging.
iDatum NIET converteren naar een double!
iDatum1 = cDate(me.Periode.Column(1)
iDatum2 = cDate(me.Periode.Column(1)
sFilter = "Startdatum between #" & datum1 & "# and #" & datum2 & "#"
With Forms!Projecten.Form
Filter=sFilter
FilterOn= true
end with