Thanks and sorry about not elaborating, but here is the code I'm using:

Public Sub ChangeDictBMName(DictAcr As String)
Dim ff As FormField
Dim tempName As String

On Error GoTo ErrHndler

For Each ff In ActiveDocument.FormFields

   If Mid$(ff.Name, 11, Str(Len(DictAcr))) = DictAcr And Right$(ff.Name, 1)
= "x" Then
       tempName = Left$(ff.Name, Len(ff.Name) - 1) & Str$(glbThisSuppQty)
       ff.Name = tempName
   End If
   
Next ff

Exit Sub

ErrHndler:
   ret = MsgBox(Err.Number & ": " & Err.Description, , "LC Standard Report:
ChangeDictBMName")

End Sub

Before I enter into this code, I've looked for the autotext entry to see if
it is already inserted into the document by searching for a bookmark, and
determined how many of that entry has already been inserted into the
document.  That number is stored in glbThisSuppQty.  I then insert the
autotext entry then go into the code above.  The passed argument, DictAcr,
holds values such as "N", "PR", "PL", etc.  One autotext entry has multiple
form fields named, for example, "DICTATION_N1_x", "DICTATION_N2_x",
"DICTATION_N3_x", etc.  The "x" needs to be changed to the number of copies
of that autotext entry.

I hope this helps a little.

Thanks