PowerPivot钻取格式
PowerPivot钻取格式
提问于 2012-05-13 14:18:22
有人知道如何在PowerPivot演练中执行格式设置吗？每当我在PowerPivot工作簿上进行演练时，生成的报表没有在PowerPivot中设置格式，它只具有表中的原始格式。
回答 1
Stack Overflow用户
发布于 2012-11-07 19:27:30
要更改默认表颜色，请执行以下操作：
- 双击可向下钻取并查看页面。
- 选项卡现在显示“表工具.表格样式中的
- ”组单击右下角下拉按钮查看底部的“新表格样式.”
- 查找此对话框底部的复选框(新表样式快速设置)“设置为此文档的默认表快速样式”
H 210G 211
如果您还想做任何其他事情，就必须使用宏，这是我过去如何完成列隐藏的：
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然后将其放在tandard代码模块中：
Sub blahh(sht As Worksheet)
MsgBox "formatting new sheet: " & sht.Name
End Sub经过测试并使用了枢轴表，Excel 2007已经向钻取下表添加了一些样式。
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/10572468
复制相关文章
相似问题
腾讯云开发者
