How can I populate a DocVariable with a string value using VBA when the DocVariable field is contained within a TextBox

Question

I am populating values into DocVariable fields using Access VBA throughout documents. This part is mostly working. The only part that is not working is when the DocVariable fields are placed inside of textboxes.

Legend a. DOC VARIABLE EXAMPLE: {DOCVARIABLE "Department_Name" * MERGEFORMAT}*** b. TempVars!Depart_Name.Value Is a textstring c. MergeDoc is a word template document

I create the word instance and then provide the template to the instance

1. Set oword = CreateObject("Word.Application")
2. Set wrd1 = oword.Documents.Add(MergeDoc)

Now I populate the DocVariable with the value

3. wrd1.Variables("Depart_Name").Value = Nz(TempVars!Depart_Name.Value, " ")

This all works until I try to populate the DocVariable when it is contained within the textbox. Nothing happens. It is like it does not see the DocVariable at all when it is located within the textbox.

Additionally, When I perform the below, It behaves the same way as when populating the values into DocVariable fields when within a textbox.

Dim fld As Word.Field
For Each fld In wrd1.Fields
    If fld.Type = wdFieldDocVariable Then
       fld.Unlink
    End If
Next

It is like it does not know the fields are present Joe