ник: Lukas
Где-то так, для будущих дел:
Добавляем в форму поле для фильтра, называем "fldFiltr", на событие "После обновления" :
Private Sub fldFiltr_AfterUpdate()
Me.Filter = "[Осталось/Прошло дней]>=0 AND [Осталось/Прошло дней]<=" & Me.fldFiltr
Me.FilterOn = True
End Sub
|
Не мешало бы проверять значения поля fldFiltr перед формированием строки фильтра.