powerpivot - PowerPivot 钻取格式化

Question

有谁知道在 PowerPivot 钻取中进行格式化的方法？每当我在 PowerPivot 工作簿上进行钻取时，生成的报告都没有在 PowerPivot 中设置格式，它只有表格中的原始格式。

Answer 1

要更改默认表格颜色，请执行以下操作：

1. 双击向下钻取并查看页面。
2. 您的标签现在显示表格工具..
3. 在表格样式组中单击右下方的下拉按钮以查看所有样式
4. 在底部看到“新表格样式...”
5. 找到此对话框底部的复选框（新建表格快速样式）“设置为此文档的默认表格快速样式”

如果你想做其他事情，你必须使用宏，这就是我过去完成列隐藏的方式：

Dim pt As PivotTable 
Dim pf As PivotField 
Dim pi As PivotItem 

Set pt = Me.PivotTables("PivotTable1") ' replace with your PT name (see in pivot table options)

For Each pf In pt.PivotFields 
    If pf.Name = "Field1" Then ' change this to your field name
        For Each pi In pf.PivotItems 
            pi.ShowDetail = True ' True to show, False to Hide
    Next pi 
End If 
Next pf 

通过宏完成此操作的另一种方法是将类似这样的内容放入工作簿模块中：

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

然后把它放在标准代码模块中：

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

Excel 2007 经过测试并与数据透视表一起使用，已经为向下钻取表添加了一些样式。