hi all,
I have a bit of code which inserts 2 formula's into cells which i then use as criteria for a sort/filter.
Currently it filters 2 date columns to include all dates between today's date and 3 months into the future.
It now seems users might want to see dates further into the future e.g. 5 months. Is it possible to give the user the option on how many months into the future they can filter?
edit: perhaps something like an input box?
Range("R2").Select
ActiveCell.FormulaR1C1 = "=""<""&EDATE(TODAY(),3)"
Range("S2").Select
ActiveCell.FormulaR1C1 = "="">""&TODAY()"
Columns("A:O").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
"R1:S2"), CopyToRange:=Range("T1"), Unique:=False
Bookmarks