数据透视表刷新之前自动运行宏

时间:2019-07-09 16:43:24

标签: vba

我想在数据透视刷新事件中自动运行宏,但是这里遇到的挑战是先运行宏,然后数据透视必须刷新

我尝试了所有这些事件,但没有一个对我有帮助

Private Sub Worksheet_PivotTableAfterValueChange(ByVal TargetPivotTable As PivotTable, ByVal TargetRange As Range)
    MsgBox "Worksheet_PivotTableAfterValueChange"
End Sub

Private Sub Worksheet_PivotTableBeforeAllocateChanges(ByVal TargetPivotTable As PivotTable, ByVal ValueChangeStart As Long, ByVal ValueChangeEnd As Long, Cancel As Boolean)
    MsgBox "Worksheet_PivotTableBeforeAllocateChanges"
End Sub

Private Sub Worksheet_PivotTableBeforeCommitChanges(ByVal TargetPivotTable As PivotTable, ByVal ValueChangeStart As Long, ByVal ValueChangeEnd As Long, Cancel As Boolean)
    MsgBox "Worksheet_PivotTableBeforeCommitChanges"
End Sub

Private Sub Worksheet_PivotTableBeforeDiscardChanges(ByVal TargetPivotTable As PivotTable, ByVal ValueChangeStart As Long, ByVal ValueChangeEnd As Long)
    MsgBox "Worksheet_PivotTableBeforeDiscardChanges"
End Sub

请问有人可以帮我吗?预先感谢

请参阅此链接以获取更多信息:https://answers.microsoft.com/en-us/msoffice/forum/all/automatically-executing-a-macro-when-i-refresh/d11c424c-4ba5-4ba1-9454-e2c0072cdb7f

0 个答案:

没有答案