我只想更改由宏生成的数据透视表的字体大小。
With ActiveSheet.PivotTables("PivotTable")
.PivotFields("FieldName").ShowDetail = False
.DataBodyRange.Font.Size = 10
End With
我现在正在使用此方法来更改字体大小,但这只会影响包含数据的单元格,而忽略作为字段名称的单元格。我想更改数据透视表中所有内容的字体大小。
答案 0 :(得分:4)
尝试使用
With ActiveSheet.PivotTables("PivotTable")
.PivotFields("FieldName").ShowDetail = False
.TableRange1.Font.Size = 10
End With