需要修复Excel VBA：指定的维度对当前的图表types无效
我的问题如上所述，指定的维度对当前的图表types无效。
但这里是奇怪的事情，我使用了两个不同的文件相同的代码，只有两个文件中的一个不工作，这是在Excel 2010上完成的。例如，我用它在文件a.xlsm它的工作罚款做什么它应该这样做。 但是，当我在文件b.xlsm（从.csv文件转换）中使用它，我不断收到此错误，并运行时错误“-2147352565（8002000b）”。
我的代码如下：
Sub AddChartObject() Dim Cht As ChartObject Set Cht = ActiveSheet.ChartObjects.Add _ (Left:=300, Width:=375, Top:=100, Height:=225) Cht.Chart.SetSourceData Source:=Sheets("Sheet1").Range("B2:B10") Cht.Chart.ChartType = xlXYScatterLines Worksheets(1).ChartObjects(1).Activate ActiveChart.HasTitle = True ActiveChart.ChartTitle.Text = "Testing" End Sub 我从这里find它： http : //peltiertech.com/Excel/ChartsHowTo/QuickChartVBA.html#topofpage
错误一直指向这条线
myChtObj.Chart.SetSourceData Source:=Sheets("Sheet1").Range("B2:B10")
在这里是另一个类似的问题在这里是VBA的Excel：指定的维度是无效的当前图表types我尝试了解决scheme发布，但它并没有真正的工作，如果有人可以指出我在右方向。
如果用excel打开了csv文件，表格名称可能不是“Sheet1”，而是csv文件的文件名。 尝试
Source:=Sheets(1).Range("B2:B10")