Question

我试图在excel 2007中实现一些vba代码来复制图表（图表对象），然后将其移动到另一张表格。我已经设法做到这一点很好，但是在2010年遇到了一些问题。我已经转向使用chartobject.duplicate方法创建副本，但遇到了不匹配错误。该程序确实复制了图表，但仍然出错。

Dim w As Double 'The width of the new table
Dim h As Double 'The height of the new table
Dim cht As ChartObject



    Worksheets("Charts").ChartObjects("OT DAY").Activate
    Set cht = Worksheets("Charts").ChartObjects("OT DAY").Duplicate
    cht.Name = "Chart 1"
    Worksheets("Charts").Charts("Chart 1").Location xlLocationAsNewSheet, curMod

当我将cht设置为objectchart副本时发生错误。

谢谢！

Answer 1

Dim cht As Shape 'not ChartObject

重复方法的不匹配错误

1 个答案: