VBA Excel 2010-将图表分配给对象/变量

Question

众所周知，

Dim wkSheet as Worksheet
Set wkSheet = ActiveSheet

它将使活动表由wkSheet定义，您可以使用wkSheet对其进行wkSheet

我的问题是，如何使用图表？

您可以使用ActiveChart. 几乎可以对图表进行任何操作。

但是我似乎无法将图表设置为变量/对象/形状（或需要的形状）

Answer 1

Public Sub cht()

Dim v As Chart

Set v = ActiveChart

End Sub

这对我有用。 有活动的图表吗？

Answer 2

如果您需要使用chartObject变量类型，可以通过这种方式进行

Dim wb As Workbook
Dim ws As Worksheet
Dim chrt As ChartObject

Set wb = ActiveWorkbook
Set ws = ActiveSheet

Set chrt = ws.ChartObjects(wb.ActiveChart.Parent.Name)