Classe DefaultPivotTableLayoutOptions (Excel VBA)

Set

Para usar uma variável de classe DefaultPivotTableLayoutOptions, ela primeiro precisa ser instanciada por exemplo

Dim dpts as DefaultPivotTableLayoutOptions
Set dpts = Application.DefaultPivotTableLayoutOptions

As variáveis ​​de classe DefaultPivotTableLayoutOptions podem ser definidas usando o procedimento Application.DefaultPivotTableLayoutOptions.

Propriedades

AllowMultipleFilters

Application.DefaultPivotTableLayoutOptions.AllowMultipleFilters = True

CalculatedMembersInFilters

Application.DefaultPivotTableLayoutOptions.CalculatedMembersInFilters = True

ColumnGrand

Application.DefaultPivotTableLayoutOptions.ColumnGrand = True

CompactRowIndent

Application.DefaultPivotTableLayoutOptions.CompactRowIndent =

DisplayContextTooltips

Application.DefaultPivotTableLayoutOptions.DisplayContextTooltips = True

DisplayEmptyColumn

Application.DefaultPivotTableLayoutOptions.DisplayEmptyColumn = True

DisplayEmptyRow

Application.DefaultPivotTableLayoutOptions.DisplayEmptyRow = True

DisplayErrorString

Application.DefaultPivotTableLayoutOptions.DisplayErrorString = True

DisplayFieldCaptions

Application.DefaultPivotTableLayoutOptions.DisplayFieldCaptions = True

DisplayImmediateItems

Application.DefaultPivotTableLayoutOptions.DisplayImmediateItems = True

DisplayMemberPropertyTooltips

Application.DefaultPivotTableLayoutOptions.DisplayMemberPropertyTooltips = True

DisplayNullString

Application.DefaultPivotTableLayoutOptions.DisplayNullString = True

EnableDrilldown

Application.DefaultPivotTableLayoutOptions.EnableDrilldown = True

EnableWriteback

Application.DefaultPivotTableLayoutOptions.EnableWriteback = True

ErrorString

Application.DefaultPivotTableLayoutOptions.ErrorString =

FieldListSortAscending

Application.DefaultPivotTableLayoutOptions.FieldListSortAscending = True

HasAutoFormat

Application.DefaultPivotTableLayoutOptions.HasAutoFormat = True

InGridDropZones

Application.DefaultPivotTableLayoutOptions.InGridDropZones = True

LayoutBlankLine

Application.DefaultPivotTableLayoutOptions.LayoutBlankLine = True

MergeLabels

Application.DefaultPivotTableLayoutOptions.MergeLabels = True

NullString

Application.DefaultPivotTableLayoutOptions.NullString =

PageFieldOrder

Application.DefaultPivotTableLayoutOptions.PageFieldOrder = True

PageFieldWrapCount

Application.DefaultPivotTableLayoutOptions.PageFieldWrapCount =

Parent

Dim objParent As Object
Set objParent = Application.DefaultPivotTableLayoutOptions.Parent

PreserveFormatting

Application.DefaultPivotTableLayoutOptions.PreserveFormatting = True

PrintDrillIndicators

Application.DefaultPivotTableLayoutOptions.PrintDrillIndicators = True

PrintTitles

Application.DefaultPivotTableLayoutOptions.PrintTitles = True

RefreshOnFileOpen

Application.DefaultPivotTableLayoutOptions.RefreshOnFileOpen = True

RepeatAllLabels

Application.DefaultPivotTableLayoutOptions.RepeatAllLabels = xlDoNotRepeatLabels

RepeatItemsOnEachPrintedPage

Application.DefaultPivotTableLayoutOptions.RepeatItemsOnEachPrintedPage = True

RowAxisLayout

Application.DefaultPivotTableLayoutOptions.RowAxisLayout = xlCompactRow

RowGrand

Application.DefaultPivotTableLayoutOptions.RowGrand = True

SaveData

Application.DefaultPivotTableLayoutOptions.SaveData = True

ShowDrillIndicators

Application.DefaultPivotTableLayoutOptions.ShowDrillIndicators = True

ShowValuesRow

Application.DefaultPivotTableLayoutOptions.ShowValuesRow = True

SortUsingCustomLists

Application.DefaultPivotTableLayoutOptions.SortUsingCustomLists = True

SubtotalHiddenPageItems

Application.DefaultPivotTableLayoutOptions.SubtotalHiddenPageItems = True

SubtotalLocation

Application.DefaultPivotTableLayoutOptions.SubtotalLocation = True

Subtotals

Application.DefaultPivotTableLayoutOptions.Subtotals = True

TotalsAnnotation

Application.DefaultPivotTableLayoutOptions.TotalsAnnotation = True

ViewCalculatedMembers

Application.DefaultPivotTableLayoutOptions.ViewCalculatedMembers = True

VisualTotals

Application.DefaultPivotTableLayoutOptions.VisualTotals = True

VisualTotalsForSets

Application.DefaultPivotTableLayoutOptions.VisualTotalsForSets = True

xlMissingItemsNone

Application.DefaultPivotTableLayoutOptions.xlMissingItemsNone =