Question

我一直在制作一张工作表，我需要编辑图表的公式。

当我第一次写它时它一切正常但现在我甚至不能让VBA读取公式，尽管它仍然可以读取名称。我不知道是什么导致了这一点。

Sub test()
Dim ser As Series

[irrelevant code]

            With Worksheets("sheetX")
                For Each ser In .ChartObjects("Chart 2").Chart.SeriesCollection
                Debug.Print ser.Name
                'prints the name without a problem
                Debug.Print ser.Formula
                'Run time error: 1004 Application or object defined error

                [irrelevant code]

- 该图表有一个公式，我可以在Excel中编辑但不能在VBA中编辑

- 当我剪切图表并将其粘贴回所有工作突然之后，我不能在vba中使用cut，因为它会返回相同的错误。

Answer 1

您可以尝试使用此代码并查看它是否有效吗？只需确保活动工作表上有一个图表：

sheetX

作为猜测，可能Chart 2的名称更改为其他名称，或者通过复制+粘贴更改图表>的名称。

Answer 2

我确定问题是由工作表的某些属性引起的。图表在哪里。

我通过将它们全部移动到新工作表并将其调用一天来修复它。

感谢您的帮助！

更改图表公式时运行时错误：1004

2 个答案: