首页 文章

VBA - 刷新数据透视表正在关闭Excel

提问于
浏览
1

我正在使用VBA成功创建数据透视表,然后我尝试使用我创建的数据透视表(仍在VBA中)的数据更新图表 .

问题是,当我调用图表更新功能时,Excel会随机崩溃并关闭(有时图表会正确刷新,而且有时它不起作用) .

请在下面找到我用来更新图表的函数,我只使用SetDataSource属性:

Function GeneratePivotChart(wbSource As String, wbDestination As String, chartName As String, pivotName As String)
    With Sheets(wbDestination).ChartObjects(chartName).Chart
        .SetSourceData Source:=Sheets(wbSource).PivotTables(pivotName).TableRange1
    End With
End Function

要触发更新,我在包含数据透视表的工作表中使用PivotTableUpdate事件 .

知道为什么Excel会在更新图表数据时关闭吗?我应该删除图表并创建一个新图表吗?

谢谢你的帮助 ;)

1 回答

  • 0

    尝试 ThisWorkbook.RefreshAll 而不是PivotTableUpdate事件 .

相关问题