Selection.FormFields (Word)
Returns a FormFields collection that represents all the form fields in the selection.
For information about returning a single member of a collection, see Returning an object from a collection.
If Selection.FormFields.Count > 0 Then
MsgBox Selection.FormFields(1).Name
End If