No problem
This might be a little more versatile.
It allows Range A5:A7 to grow dynamically
![]()
Function ReviewDate(start_date As Range) As Date Dim varReviewDate As Range Dim LastRow As Long LastRow = Sheets("ReviewTable").Range("A" & Rows.Count).End(xlUp).Row Set varReviewDate = Sheets("ReviewTable").Range("$A$5:$A$" & LastRow) ReviewDate = WorksheetFunction.VLookup(start_date, varReviewDate, 1, True) End Function
Hope this helps
Bookmarks