Excel VBA教程:PreserveFormatting属性

对于数据透视表而言,当刷新报表,或由于透视、排序或更改页字段项而导致报表重新计算时,如果格式保持不变,则该值为 True。

对于查询表,如果前五行数据的通用格式将应用于该查询表的新行,则该值为 True。未使用的单元格不会设置格式。如果上一次的自动套用格式将应用于查询表中新行的数据,则该值为 False。默认值为 True。(但如果查询表是在 Microsoft Excel 97 中创建的,且HasAutoFormat属性值为 True,这时 PreserveFormatting 为 False)。

Boolean 类型,可读写。

说明

对于数据库查询表,默认的格式设置为 xlSimple。

刷新查询表时,将对查询表应用新的自动套用格式样式。只要 PreserveFormatting 的值为 False,则 AutoFormat(自动套用格式)就会被设置为 None。这样,任何在 PreserveFormatting 被设置为 False 或在查询表刷新之前设置的自动套用格式都不会起作用,且相应产生的查询表也不会被应用任何格式。

Excel VBA教程:PreserveFormatting属性·示例

本示例保留第一张工作表上的第一个数据透视表的格式。


Worksheets(1).PivotTables("Pivot1").PreserveFormatting = True

本示例演示了将 PreserveFormatting 设置为 False 后,将使 AutoFormat(自动套用格式)被设置为 xlRangeAutoFormatNone,而并不是指定的 xlRangeAutoFormatColor1 格式。


With Workbooks(1).Worksheets(1).QueryTables(1)
    .Range.AutoFormat = xlRangeAutoFormatColor1
    .PreserveFormatting = False
    .Refresh

End With

上页:Excel VBA教程:PreserveColumnInfo属性 下页:Excel VBA教程:PresetExtrusionDirection属性

Excel VBA教程:PreserveFormatting属性

Excel VBA教程:PresetExtrusionDirection属性 Excel VBA教程:PresetGradientType属性
Excel VBA教程:PresetLightingDirection属性 Excel VBA教程:PresetLightingSoftness属性
Excel VBA教程:PresetMaterial属性 Excel VBA教程:PresetShape属性
Excel VBA教程:PresetTextEffect属性 Excel VBA教程:PresetTexture属性
Excel VBA教程:PresetThreeDFormat属性 Excel VBA教程:Previous属性
Excel VBA教程:PreviousSelections属性 Excel VBA教程:PrintArea属性
Excel VBA教程:PrintComments属性 Excel VBA教程:PrintErrors属性
Excel VBA教程:PrintGridlines属性 Excel VBA教程:PrintHeadings属性
Excel VBA教程:PrintNotes属性 Excel VBA教程:PrintObject属性
Excel VBA教程:PrintQuality属性 Excel VBA教程:PrintSettings属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号