Classe Outline - uma estrutura de tópicos em uma planilha (Excel VBA)

A classe Outline representa uma estrutura de tópicos em uma planilha. Para usar uma variável de classe Outline, ela primeiro precisa ser instanciada por exemplo

Dim otl as Outline
Set otl = ActiveSheet.Outline

AutomaticStyles

True se o contorno usar estilos automáticos. Boolean de leitura/gravação.

ActiveSheet.Outline.AutomaticStyles = True

ShowLevels

Exibe o número especificado de níveis de linhas e/ou colunas de tópicos.

Você precisa especificar pelo menos um argumento.

ShowLevels (RowLevels, ColumnLevels)

Worksheets("Sheet1").Outline _ 
 .ShowLevels rowLevels:=3, columnLevels:=1

Arguments

Optional arguments

Os seguintes argumentos são opcionais

RowLevels (Long) - Especifica o número de níveis de linha dos tópicos a exibir. Se os tópicos tiverem menos níveis que o número especificado, o Microsoft Excel exibirá todos os níveis. Se esse argumento for 0 (zero) ou se for omitido, nenhuma ação será efetuada sobre as linhas.

ColumnLevels (Long) - Especifica o número de níveis de coluna dos tópicos a exibir. Se a estrutura de tópicos tiver menos níveis do que o número especificado, o Excel exibirá todos os níveis. Se esse argumento for 0 (zero) ou se for omitido, nenhuma ação será efetuada sobre as colunas.

SummaryColumn

Retorna ou define o local das colunas de resumo no tópico. Leitura/gravação XlSummaryColumn. Os valores de retorno possíveis são xlSummaryOnLeft - A coluna de resumo será posicionada à esquerda das colunas de detalhe nos tópicos, xlSummaryOnRight - A coluna de resumo será posicionada à direita das colunas de detalhe nos tópicos.

ActiveSheet.Outline.SummaryColumn = xlSummaryOnLeft

SummaryRow

Retorna ou define o local das linhas de resumo no tópico. Leitura/gravação XlSummaryRow. Os valores de retorno possíveis são xlSummaryAbove - A linha de resumo será posicionada acima das linhas de detalhe nos tópicos, xlSummaryBelow - A linha de resumo será posicionada abaixo das linhas de detalhe nos tópicos.

Defina XlSummaryRow como xlAbove para tópicos em estilo Microsoft Word, nos quais os títulos de categorias ficam acima das informações detalhadas. Defina XlSummaryRow como xlBelow para tópicos em estilo de contabilidade, nos quais os somatórios ficam abaixo das informações detalhadas.

ActiveSheet.Outline.SummaryRow = xlSummaryAbove