从Excel数据更新MSword图表

Question

我需要从excel数据更新现有的MS单词表，即“ chart1”和“ chart2”。 MS字是客户设置的格式，我有打开给定MS字的代码。

Sub UpdateChart()

Set Openword = CreateObject("word.Application")
Openword.Visible = True
Set Opendocument = Openword.documents.Open("XXX\Doc1.docx")

End Sub

在客户文档中，它们具有图表。需要创建一个宏来接收来自excel的数据并在MS字图中更新。

我尝试了以下步骤。

在MS字中，转到“布局”，“选择”窗格，然后激活“ chart1”

我尝试记录上述步骤以激活图表，但用MS字表示未记录。