运行时错误1004-将值插入数据透视表过滤器

如何解决运行时错误1004-将值插入数据透视表过滤器

我试图根据Excel中的下拉列表将值插入到数据透视表中。 每个数据透视表与一个数据透视图相关，通过与另一工作簿的连接使用相同的数据，并且全部包含在同一工作表中。数据透视表彼此相距5列，并且彼此不能重叠。

我不明白宏是有气质的。可以多次使用（刷新图表），但很快就会抛出以下内容。

运行时错误“ 1004”： 我们无法对所选单元格进行此更改，因为它会影响数据透视表。

关闭并重新打开工作簿后，运行时错误消失了10次，但仍再次出现。

下面是当前代码：

Sub refresh_graphs()
With ThisWorkbook.Worksheets("Graphs")
    Range("BD2").Value = Range("F1").Value
    Range("BG2").Value = Range("F1").Value
    Range("BJ2").Value = Range("F1").Value
    Range("BM2").Value = Range("F1").Value
    Range("BP2").Value = Range("F1").Value
    Range("BS2").Value = Range("F1").Value
    Range("BW2").Value = Range("F1").Value
    Range("BZ2").Value = Range("F1").Value
    Range("CC2").Value = Range("F1").Value
    Range("CF2").Value = Range("F1").Value
    Range("CI2").Value = Range("F1").Value
    Range("CL2").Value = Range("F1").Value
    Range("CO2").Value = Range("F1").Value
End With
End Sub

有什么想法吗？ 非常感谢！