For Each
For
Each
fld
In
srt.Fields Debug.
Print
fld.Name
Next
fld