Extract data based on date

[Ahlis1979]

Hi,

Is there a good formula that could do this:

Book1
	A	B	C	D	E	F	G	H	I	J	K	L	M	N	O	P	Q	R
1		Today:	2021-09-15
2									Date should be sorted by oldest to newest
3									Criteria: Is the date older then today, then it shouldn't show that date in the result view.
4									It should only show the 15 oldest that are later or equal today().
5		Add dates here							Result					Result I want to get
6	ID	Date Start	Date End	Task	Name	Status			Date Start	Date End	Task	Name			Date Start	Date End	Task	Name
7	1	2021-09-14	2021-09-14	Test 1	Adam	To old		1	2021-09-14	2021-09-14	Test 1	Adam		1	2021-09-15	2021-09-17	Test 3	Maria
8	2	2021-09-16	2021-09-15	Test 2	Lucas	This week		2	2021-09-15	2021-09-17	Test 3	Maria		2	2021-09-16	2021-09-15	Test 2	Lucas
9	3	2021-09-15	2021-09-17	Test 3	Maria	Today		3	2021-09-16	2021-09-15	Test 2	Lucas		3	2021-09-20	2021-09-24	Test 4	Edward
10	4	2021-09-20	2021-09-24	Test 4	Edward	Next week		4	2021-09-20	2021-09-24	Test 4	Edward		4	2021-10-01	2021-10-01	Test 5	Alice
11	5	2021-10-01	2021-10-01	Test 5	Alice	Future		5	2021-10-01	2021-10-01	Test 5	Alice		5
12	6							6						6
13	7							7						7
14	8							8						8
15	9							9						9
16	10							10						10
17	11							11						11
18	12							12						12
19	13							13						13
20	14							14						14
21	15							15						15
22	16
23	17
24	18
25	19
26	20
27	21
28	22
29	23
30	24
31	25
32	26
33	27
34	28
35	29
36	30
Sheet3

Cell Formulas
Range	Formula
C1	C1	=TODAY()
J7:J21	J7	=IFERROR(INDEX($C$7:$C$21,MATCH(SMALL($B$7:$B$36,ROW(A1:A15)),$B$7:$B$36,0),1),"")
K7:K21	K7	=IFERROR(INDEX($D$7:$D$21,MATCH(SMALL($B$7:$B$36,ROW(B1:B15)),$B$7:$B$36,0),1),"")
L7:L21	L7	=IFERROR(INDEX($E$7:$E$21,MATCH(SMALL($B$7:$B$36,ROW(C1:C15)),$B$7:$B$36,0),1),"")
F7:F11	F7	=IF(B7<TODAY(),"To old",IF(B7=TODAY(),"Today",IF(AND(B7>=TODAY()-WEEKDAY(TODAY(),2)+1,B7<=TODAY()-WEEKDAY(TODAY())+6),"This week",IF(AND(B7>=TODAY()-WEEKDAY(TODAY(),2)+8,B7<=TODAY()-WEEKDAY(TODAY())+13),"Next week",IF(B7>TODAY()-WEEKDAY(TODAY())+13,"Future","")))))
I7:I21	I7	=IFERROR(SMALL($B$7:$B$36,H7),"")
O7:O21	O7	=IFERROR(SMALL($B$7:$B$36,N8),"")
Dynamic array formulas.

 

[Fluff]

How about

+Fluff 1.xlsm
	A	B	C	D	E	F	G	H	I	J	K	L
1		Today:	15/09/2021
2
3
4
5		Add dates here							Result
6	ID	Date Start	Date End	Task	Name	Status			Date Start	Date End	Task	Name
7	1	14/09/2021	14/09/2021	Test 1	Adam	To old		1	15/09/2021	17/09/2021	Test 3	Maria
8	2	16/09/2021	15/09/2021	Test 2	Lucas	This week		2	16/09/2021	15/09/2021	Test 2	Lucas
9	3	15/09/2021	17/09/2021	Test 3	Maria	Today		3	20/09/2021	24/09/2021	Test 4	Edward
10	4	20/09/2021	24/09/2021	Test 4	Edward	Next week		4	01/10/2021	01/10/2021	Test 5	Alice
11	5	01/10/2021	01/10/2021	Test 5	Alice	Future		5
12	6							6
13	7							7
14	8							8
15	9							9
16	10							10
17	11							11
18	12							12
19	13							13
20	14							14
21	15							15
22	16
23	17
24	18
25	19
26	20
27	21
28	22
29	23
30	24
31	25
32	26
33	27
34	28
35	29
36	30
Main

Cell Formulas
Range	Formula
C1	C1	=TODAY()
I7:L10	I7	=LET(Srt,SORT(FILTER(B7:E36,B7:B36>=C1),1),INDEX(Srt,SEQUENCE(MIN(15,ROWS(Srt))),{1,2,3,4}))
F7:F11	F7	=IF(B7<TODAY(),"To old",IF(B7=TODAY(),"Today",IF(AND(B7>=TODAY()-WEEKDAY(TODAY(),2)+1,B7<=TODAY()-WEEKDAY(TODAY())+6),"This week",IF(AND(B7>=TODAY()-WEEKDAY(TODAY(),2)+8,B7<=TODAY()-WEEKDAY(TODAY())+13),"Next week",IF(B7>TODAY()-WEEKDAY(TODAY())+13,"Future","")))))
Dynamic array formulas.

 

[Ahlis1979]

thx

 

[Fluff]

You're welcome.