Need help on macro formula

[its.joesef]

Hi, need help figuring out a macro formula for a report that I have to create.

The report takes an upload from another report with line items that are outstanding from a certain date and needs to determine how long they are outstanding and create column with the amount of days outstanding for each line entry.

For example, a line item for Goods & Services is dated 03/01/2016 and the report is for 03/10/2016. I need this column to determine that this line item is outstanding for 9 days.

So far this is what I got for my Days Outstanding Column.

Moderator's note: Please take the time to review our rules. There aren't many, and they are all important. Rule #3 requires code tags. I have added them for you this time because you are a new member. --6StringJazzer

Range("J3").Select
    ActiveCell.FormulaR1C1 = "Days Outstanding"
    Range("J4").Select
    ActiveCell.FormulaR1C1 = "=DAYS(TODAY(),RC[-6])"
    ActiveCell.Copy
    Range(Selection, Selection.End(xlDown)).Select
    ActiveSheet.Paste
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Application.CutCopyMode = False

This works currently as it calculates the difference between the date six columns before it with today, but I need to tweak the formula "=DAYS(TODAY(),RC[-6])" so that it reflects the days outstanding with the "report date" and not as of "today" as there is sometimes a 1 or 2 day difference. The date of the report is in cell A2 but it includes some wording in front of it, for example "As of 03/08/2016".

My new formula I am trying is "=DAYS((MID,$A$2,7,10),RC[-6])" but it doesn't seem to work and gives me an error.

Any ideas?

Thanks