[已解决]如何用VBA做到双击数据透视表数据区，弹出的明细不是新建表，而显示在指定表？

cabcd1

如何用VBA做到双击数据透视表数据区，弹出的明细不是新建表，而显示在指定表？

最佳答案

月排行榜 / 总排行榜

爱疯

2017-1-13 14:54

Private Sub Workbook_NewSheet(ByVal Sh As Object)
    Application.DisplayAlerts = False
    On Error Resume Next
    Sheets("abc").Delete
    On Error GoTo 0
    ActiveSheet.Name = "abc"
End Sub
如何让透视表双击后不增加工作表3.rar (12.21 KB, 下载次数: 105)

2017-1-13 14:54 上传

点击文件名下载附件

跳转到最佳答案楼层

爱疯

Private Sub Workbook_NewSheet(ByVal Sh As Object)
    Application.DisplayAlerts = False
    On Error Resume Next
    Sheets("abc").Delete
    On Error GoTo 0
    ActiveSheet.Name = "abc"
End Sub
如何让透视表双击后不增加工作表3.rar (12.21 KB, 下载次数: 105)

2017-1-13 14:54 上传

点击文件名下载附件

cabcd1

厉害了爱疯老师，完美的解决了我的问题