Field.Previous (Word)

Returns the previous object in the collection.

Set aField = ActiveDocument _ 
 .Fields(ActiveDocument.Fields.Count).Previous 
MsgBox "Field code = " & aField.Code