Проблемы с подсчетами макросов между двумя датами

У меня возникают трудности с подсчета дней со вчерашнего дня до даты, впервые зарегистрированной в прошлом. См. ActiveCell.FormulaR1C1 = "=NOW()-RC[-14]"

 //add number of days outstanding [a1].End(xlToRight).Offset(0, 1).Select ActiveCell.FormulaR1C1 = "Days outstanding" ActiveCell.Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=NOW()-RC[-14]" If Not IsEmpty(ActiveCell.Offset(1, -1)) Then Selection.AutoFill Destination:=Range(ActiveCell, ActiveCell.Offset(0, -1).End(xlDown).Offset(0, 1)) 

Давайте будем гением компьютера.