I am getting a Compile error on the red line: Expected Function or variable.
Sub age()
RC = Cells(Rows.Count, "G").End(xlUp).Row + 12 'Start on row 12
For r = 1 To RC
d = Cells(r, "G").Text
sd = Mid(d, 7, 2) & "/" & Mid(d, 5, 2) & "/" & Left(d, 4)
age = Cells(8, "J") - CDate(sd)...