是否可以使用VBA添加重复部分内容控制部分？

我已经创建了Word模板重复部分电流控制 (RSCC)含有其他内容控制。我还有 Excel 工作簿，其中包含应转到提到的 Word 模板的信息。我想做的事情是创建宏，该宏将使用 Excel 工作簿中选定行的信息填充 Word 模板（每行到新的 RSCC 部分）。

我很清楚如何做到这一点，除了一件事 - 我不知道如何编写宏来添加另一个部分重复部分内容控制.

我正在添加我正在尝试做的事情的插图：

问题是，我找不到用 VBA 执行相同操作的代码。我尝试过录制过程，但录制的宏是空的（？！）。

寻找我找到的答案这个线程 https://stackoverflow.com/questions/44571084/word-vba-add-row-to-repeating-section-content-control在 StackOverflow 中，它提出了与我类似的问题，但根据我的理解，它或多或少没有得到解答。此线程中的评论转发到旧线程微软论坛 https://social.msdn.microsoft.com/Forums/en-US/66516e31-cccd-4f02-bf2a-00af4c280d5d/repeating-section-content-control-quotplaceholder-textquot?forum=worddev，但我没有找到这个问题的解决方案（或者至少我没有清楚地理解我应该如何处理它）。

由于一个线程已有近 5 年历史，另一个线程已有 2 年历史。我的问题是是否可以使用 VBA 向 RSCC 添加另一个部分？也许有人在过去一年左右找到了一种方法来做到这一点？

Word 对象模型具有用于重复部分内容控件的集合和对象：RepeatingSectionItems and RepeatingSectionItem。后者有两种插入方法，在之前或之后插入RepeatingSectionItem.

下面的示例展示了如何引用文档中的重复部分内容控件、获取第一个或最后一个项目并在其后插入一个新项目。

Sub AddRepeatingSection()
    Dim cc As Word.ContentControl
    Dim repCC As Word.RepeatingSectionItem

    Set cc = ActiveDocument.SelectContentControlsByTitle("RepCC").Item(1)
    Set repCC = cc.RepeatingSectionItems.Item(1)
    'Or to get the last one:
    'Set repCC = cc.RepeatingSectionItems.Item(cc.RepeatingSectionItems.Count)
    repCC.InsertItemAfter        
End Sub