vba - Excel-VBA 兼容性问题

Question

我在我的 Excel 仪表板中使用了以下语句：

HeaderTableSheet.ChartObjects("Header_BreakEvenAnalysis").Copy

它每次在 Excel-2007 上都能正常工作，但在 Excel-2010 中出现错误“应用程序定义或对象定义错误”（也不是每次都这样）

我也无法弄清楚原因。

请问有什么解决方案/解决方法吗？

Answer 1

复制图表前需要激活工作表（仅在 Excel-2010 中需要）

所以下面的代码起作用了：

HeaderTableSheet.Activate
HeaderTableSheet.ChartObjects("Header_BreakEvenAnalysis").Copy

Answer 2

你能试试这个吗？

Option Explicit

Sub yourSUB()
Dim myChart As ChartObject

'--- other codes

    For Each myChart In Sheets("SheetName").ChartObjects
      If myChart.Name = "Header_BreakEvenAnalysis" Then
        myChart.Copy 
      End If
    Next myChart

'---other codes
'---release the memory and clean up
Set myChart = Nothing
End Sub