使用VBA代码在word表格中填充域代码，提示错误，请各位大神帮忙看下

小盆友靠自己

如下图所示：

项目	年末余额	年初余额
库存现金	1.00
银行存款
其他货币资金
合计
其中：存放在境外的款项总额

黄色单元格中存在link域代码，我通过VBA代码，想达到如下效果，就是选择了有颜色这个区域后，运行vba代码后，绿色单元格里面也自动填充上link域代码，在执行的过程中，如下代码出现了问题，请各位大神帮忙修改下：

            targetCell.Range.Fields.Add _
                Range:=targetCell.Range, _
                Type:=wdFieldEmpty, _
                Text:=newCode

targetCell就是绿色区域
PS：同时附上源文件