数据透视表更改时运行宏

时间:2019-05-28 12:17:56

标签: excel vba pivot-table

有什么方法可以检测VBA中的数据透视表何时更改,是否设置了过滤器?

我有一个宏,我想在用户更改数据透视表的过滤器时自动运行。

2 个答案:

答案 0 :(得分:1)

尝试:

mMediaRecorder.setVideoEncoder(MediaRecorder.VideoEncoder.H264);
mMediaRecorder.setVideoEncoder(MediaRecorder.VideoEncoder.DEFAULT);
mMediaRecorder.setVideoEncoder(mProfile.videoCodec);

答案 1 :(得分:0)

另一个答案几乎是优雅的,但是如果更改了某些标题,则不会引发PivotTableUpdate事件:

screenshot of pivot table captions

如果您需要在数据透视表中进行任何更改的事件,请在工作表的代码模块中使用以下代码:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Me.PivotTables(1).TableRange2) Is Nothing Then
        MsgBox "Pivot's TableRange2 Changed"
    End If
End Sub