What you're attempting should probably be done using
VB and DAO RecordSets to parse the sorted (descending) age table, and create a new table based on those results. You shouldn't need to add a new column to the original table, just some code like:
Set rst 'blah blah blah
If Not rst.BOF And Not rst.EOF
rst.MoveFirst
colName = rst.Name
colAge = rst.Age
rank = 1
rst.MoveNext
Do Until rst.EOF
If colAge = rst.Age Then
'Add colName, Rank to new table
Else
'Add colName, Rank to new table
Rank = Rank + 1
End If
'Add colName, Rank (not sure about this, figure out if necessary to avoid off-by-one error