• For your end date I think it should be

    =DateAdd(DateInterval.Day,6,DateAdd(DateInterval.Day,7-Weekday(Today,FirstDayOfWeek.Tuesday),Today))

    Far away is close at hand in the images of elsewhere.
    Anon.