Question

我有一个包含日期的三十个值的列表。编辑表格后，VBA将所有三十行向下移动一行，删除第31行，然后将新行添加到顶部。（这是一个值的三十天历史记录）。这在图形中表示，但是当VBA将线向下移动时，图形范围也是如此。我尝试设置一些代码来自动将范围设置为30天历史记录更新后的范围，但我得到

错误91：未设置对象变量或块变量。

我不确定为什么会期望有物体？

我尝试编写代码，但收到对象错误。

' Copy Raw Data to L30 Filter Log

    Sheets("RawData_L30").Select
    Rows("32:32").Select
    Selection.ClearContents
    Rows("3:31").Select
    Selection.Cut Destination:=Rows("4:32")
    Range("A3").Select

        Sheets("RawData").Select
                Range("A5:AY5").Select
                    Selection.Copy
                    Sheets("RawData_L30").Select
                    Range("B3").Select
                    ActiveSheet.Paste

                        Range("A3").Select
    ActiveCell.FormulaR1C1 = "=RC[3]+RC[4]"

' Reset graph dates
    Sheets("Dashboard Report").Select
    ActiveChart.SeriesCollection(1).XValues = "=RawData_L30!B3:B32"

我希望图形范围可以“重置”为应该的范围，并且不会改变

如何使用VBA编辑图形范围

0 个答案: