自动格式数据透视表向下钻取

Question

我在excel中有一个数据透视表，显示我们网站的推荐域名。向下钻取时，它会显示引荐来自的特定页面。数据透视表按推荐数量（从最高到最低）排序。但是，当您向下钻取时，没有任何顺序。虽然手动分析钻取并不困难，但我在演示文稿中使用电子表格并且不想在我演示时使用数据和格式。

有没有办法自动格式化钻取？喜欢按推荐数量排序，也可能调整几行？

Answer 1

这在Thisworkbook代码模块中：

Private Sub Workbook_NewSheet(ByVal Sh As Object)
ans = MsgBox("Format this sheet?", vbYesNo)
If ans = vbYes Then doFormatting Sh
End Sub

这在标准代码模块中：

Sub doFormatting(sht As Worksheet)
MsgBox "formatting new sheet: " & sht.Name
End Sub

（当然，根据需要插入格式）

Answer 2

我不知道您是否正在寻找vba解决方案，但我确信功能已经存在。

您可以对任何向下钻取字段进行排序。

如果在演示过程中点击几个按钮太多而无法担心，那么我建议只在下一个幻灯片/工作表上放置一个经过修改的数据透视表副本。

例如：

我不确定这张图片是否适合你。