Sub smarterway()
Dim chartfirst As ChartObject
Dim rngChart As Range
Set rngChart = Range("D3:J20")
Set chartfirst = ActiveSheet.ChartObjects.Add(Left:=rngChart.Left, Top:=rngChart.Top, Width:=rngChart.Width, Height:=rngChart.Height)
[....]
对于这一行:
设置chartfirst = ActiveSheet.ChartObjects.Add(..)
如果我不添加 Activesheet ,我会收到 Object Required 错误。
我不明白为什么。它不是假设它是Activesheet,因为我通常不会在我的代码中放入Activesheet,只要我打开并激活了所需的工作表,它就能正常工作。
我明显错过并误解了vba中非常重要的内容,请提供建议