vba - VBA：将 CurrentChart 定义为单元格中的字符串

Question

我正在寻找一种方法来将当前图表设置为数组中的单元格中的任何内容。例如，我的数组将 Chart_1_4301 作为第一个列表，然后我想将图表（也称为 Chart_1_4301）设置为 CurrentChart。

而不是说

If Array_Name(i) = "Chart_1_4301" Then
 'Some sort of code
End If
If Array_Name(i) = "Chart_1_4404" Then
'Some sort of code
End If
If Array_Name(i) = "Chart_1_4552" Then....

等等。有没有办法将 CurrentChart 设置为图表的名称，其名称存储在单元格中？

我只想说这样的话：Set CurrentChart = Array_Name(i)

我知道在 MATlab 中是可能的（这是我做过的唯一其他编程），但我不知道 VBA 中的语法。任何帮助是极大的赞赏！

Answer 1

为了获得更好的帮助，发布更多代码会很有帮助。Varocarbas 在上面给出了一些建议。

我将根据对您的不完整问题的不同解释给您另一个建议。因为我不知道是什么Type（CurrentChart即，它是 aChartObject还是 a Chart？）

假设您正在对名称数组进行某种循环/迭代，并且您希望按顺序对每个图表进行操作：

For i = lBound(Array_Name) to UBound(Array_Name)

    Set CurrentChart = ActiveSheet.ChartObjects(Array_Name(i))

Next