calculated column in dates table

= COUNTROWS(FILTER(Dates,([DateEN]<=TODAY() )&&( [DateEN] >= EARLIER(Dates[DateEN] )) &&( Dates[DayOfWeek]=7))