Question

在Word文档中，我有几个表，我在其中放置了单元格中的图表。现在我需要通过VBA访问这些图表，以更新数据值和其他属性。驱动图表更新的逻辑与图表嵌入的表格相关联，因此在访问图表时我需要了解表格上下文。

最初，我曾计划为表添加书签，然后遍历与每个表关联的图表。但是，我现在意识到Word＆＃34; Table＆＃34;对象没有＆＃34; Shapes＆＃34;或＆＃34; Inlineshapes＆＃34;或＆＃34; Charts＆＃34;集合。

所以我的问题是：访问/引用表中嵌入的图表的最佳方法是什么？

Answer 1

好的，只是意识到每个单元格的“Range”属性都有一个“Inlineshapes”集合，其中嵌入了图表。

所以我可以这样做：

With Word.Application

    .Selection.GoTo what:=wdGoToBookmark, Name:="BookmarkName"

    Dim wTable As Word.Table
    Set wTable = .Selection.Tables(1)

    Dim wChart As Word.chart
    Set wChart = wTable.Cell(3, 4).Range.InlineShapes(1).chart
End With

但这意味着迭代表格中的单元格以进入图表。但是，也许有更好的方法......！

Word VBA：如何在表格中引用图表

1 个答案: