在图片类型内联对象中访问图表数据

时间:2018-12-05 13:12:43

标签: vba ms-word

我目前正在研究一个简单的word宏,该宏可从excel电子表格中读取数据并将其插入多个Word文档中的指定位置。

除了将数据作为文本放置之外,宏还将数据插入到Word模板中的现有图表中。

要使用这样的InlineShapes对象来实现此目的,

ActiveDocument.InlineShapes(6).Chart.ChartData.Activate
ActiveDocument.InlineShapes(6).Chart.ChartData.Workbook.Worksheets(1).Range("B2").Value = uwp
ActiveDocument.InlineShapes(6).Chart.ChartData.Workbook.Worksheets(1).Range("C2").Value = uwpsamo
ActiveDocument.InlineShapes(6).Chart.ChartData.Workbook.Worksheets(1).Range("D2").Value = uwpprze
ActiveDocument.InlineShapes(6).Chart.ChartData.Workbook.Worksheets(1).Range("E2").Value = uwprown
ActiveDocument.InlineShapes(6).Chart.ChartData.Workbook.Worksheets(1).Range("F2").Value = uwppodw
ActiveDocument.InlineShapes(6).Chart.ChartData.Workbook.Close

除了一个以外,这很好用

我的Word文档中总共有18个内联对象,第一个是3类(图片),其后16个是12类(图表),最后一个是3类(再次图片)。最后一个是问题。该图片的顶部是另一个图表,该图表不在ActiveDocument.InlineShapes集合中

enter image description here

有什么想法如何访问最后一个内联形状的图表数据? InlineShapes.Chart无法用于最后一个,因为图片类型没有图表对象。

0 个答案:

没有答案