Classe DataLabel (Excel VBA)

A classe DataLabel representa o rótulo de dados em um ponto de gráfico ou linha de tendência.

Os principais procedimentos da classe DataLabel são Delete, Select, DataLabels.Delete e DataLabels.Select

Set

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

Dim dtl as DataLabel
Set dtl = ActiveCell.Width(1).DataLabel

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo DataLabel: DataLabels.Item, Point.DataLabel, Trendline.DataLabel e Series.DataLabels

For Each

Aqui está um exemplo de processamento dos itens DataLabel em uma coleção.

Dim dtl As DataLabel
For Each dtl In ActiveCell.Width.DataLabels()
	
Next dtl

Temas

Alguns procedimentos nesta classe foram agrupados em temas e são descritos em páginas de tema separadas

Formula with its procedures Formula, FormulaLocal, FormulaR1C1 e FormulaR1C1Local
Number with its procedures NumberFormatLinked, NumberFormatLocal, DataLabels.NumberFormatLinked e DataLabels.NumberFormatLocal
Sort/Order with its procedures ReadingOrder e DataLabels.ReadingOrder
Display/Show with its procedures ShowBubbleSize, ShowCategoryName, ShowLegendKey, ShowPercentage, ShowRange, ShowSeriesName, DataLabels.ShowBubbleSize, DataLabels.ShowCategoryName, DataLabels.ShowLegendKey, DataLabels.ShowPercentage, DataLabels.ShowRange e DataLabels.ShowSeriesName

Métodos

Estes são os principais métodos da classe DataLabel

Delete - Exclui o objeto.

ActiveCell.Width(1).DataLabel.Delete

Select - Seleciona o objeto.

ActiveCell.Width(1).DataLabel.Select

DataLabels.Delete - Exclui o objeto.

ActiveChart.FullSeriesCollection(1).DataLabels.Delete

DataLabels.Select - Seleciona o objeto.

ActiveChart.FullSeriesCollection(1).DataLabels.Select

Estes são os principais métodos da classe

DataLabels.Item - Retorna um único objeto de uma coleção.

DataLabels.Propagate - Permite que você tire o conteúdo e a formatação de um único rótulo de dados e aplique-o a todos os outros rótulos de dados da série.

Propriedades

AutoText True se o objeto gerar automaticamente o texto apropriado com base no contexto. Boolean de leitura/gravação.

ActiveCell.Width(1).DataLabel.AutoText = True

Caption Retorna ou define um valor String que representa o texto do rótulo de dados.

ActiveCell.Width(1).DataLabel.Caption =

Characters Retorna um objeto Characters que representa um intervalo de caracteres dentro do texto do objeto. Você pode usar o objeto Characters para formatar caracteres dentro de uma cadeia de caracteres de texto.

Dim chrsCharacters As Characters
Set chrsCharacters = ActiveCell.Width(1).DataLabel.Characters

Format Retorna o objeto ChartFormat . Somente leitura.

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveCell.Width(1).DataLabel.Format

Height Retorna a altura do objeto em pontos. Leitura/gravação.

ActiveCell.Width(1).DataLabel.Height =

HorizontalAlignment Retorna ou define um valor que representa o alinhamento horizontal para o objeto especificado.

ActiveCell.Width(1).DataLabel.HorizontalAlignment = xlHAlignCenter

Left Retorna ou define um valor Double que representa a distância, em pontos, da borda esquerda do objeto à borda esquerda da coluna a em uma planilha ou à borda esquerda da área do gráfico (em um gráfico).

ActiveCell.Width(1).DataLabel.Left =

Name Retorna um valor String que representa o nome do objeto.

Dim strName As String
strName = ActiveCell.Width(1).DataLabel.Name

NumberFormat Retorna ou define um valor String que representa o código de formatação do objeto especificado.

ActiveCell.Width(1).DataLabel.NumberFormat =

Orientation Retorna ou define um valor que representa a orientação do texto.

ActiveCell.Width(1).DataLabel.Orientation = xlDownward

Parent Retorna o objeto pai do objeto especificado. Somente leitura.

Dim objParent As Object
Set objParent = ActiveCell.Width(1).DataLabel.Parent

Position Retorna ou define um valor XlDataLabelPosition que representa a posição do rótulo de dados.

ActiveCell.Width(1).DataLabel.Position = xlLabelPositionAbove

Separator Retorna ou define uma que representa o separador usado para os rótulos de dados em um gráfico. Leitura/gravação.

ActiveCell.Width(1).DataLabel.Separator = ";"

Shadow Retorna ou define um valor Boolean que determina se o objeto possuirá uma sombra.

ActiveCell.Width(1).DataLabel.Shadow = True

ShowValue Retorna ou define um Boolean que corresponde a um determinado comportamento de exibição de valores do rótulo de dados do gráfico. True para exibir os valores. False para ocultá-lo. Leitura/gravação.

ActiveCell.Width(1).DataLabel.ShowValue = True

Text Retorna ou define o texto do objeto especificado. String de leitura/gravação.

ActiveCell.Width(1).DataLabel.Text =

Top Retorna ou define um valor Double que representa a distância, em pontos, da borda superior do objeto até a parte superior da linha 1 em uma planilha ou a parte superior da área do gráfico (em um gráfico).

ActiveCell.Width(1).DataLabel.Top =

VerticalAlignment Retorna ou define um valor que representa o alinhamento vertical do objeto especificado.

ActiveCell.Width(1).DataLabel.VerticalAlignment = xlVAlignBottom

Width Retorna a largura do objeto em pontos. Somente leitura.

ActiveCell.Width(1).DataLabel.Width =

DataLabels.AutoText True se o objeto gerar automaticamente o texto apropriado com base no contexto. Boolean de leitura/gravação.

ActiveChart.FullSeriesCollection(1).DataLabels.AutoText = True

DataLabels.Count Retorna um valor Long que representa o número de objetos na coleção.

Dim lngCount As Long
lngCount = ActiveChart.FullSeriesCollection(1).DataLabels.Count

DataLabels.Format Retorna o objeto ChartFormat . Somente leitura.

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveChart.FullSeriesCollection(1).DataLabels.Format

DataLabels.HorizontalAlignment Retorna ou define um valor que representa o alinhamento horizontal para o objeto especificado.

ActiveChart.FullSeriesCollection(1).DataLabels.HorizontalAlignment = xlHAlignCenter

DataLabels.Name Retorna um valor String que representa o nome do objeto.

Dim strName As String
strName = ActiveChart.FullSeriesCollection(1).DataLabels.Name

DataLabels.NumberFormat Retorna ou define um valor String que representa o código de formatação do objeto especificado.

ActiveChart.FullSeriesCollection(1).DataLabels.NumberFormat =

DataLabels.Orientation Retorna ou define um valor que representa a orientação do texto.

ActiveChart.FullSeriesCollection(1).DataLabels.Orientation = xlDownward

DataLabels.Parent Retorna o objeto pai do objeto especificado. Somente leitura.

Dim objParent As Object
Set objParent = ActiveChart.FullSeriesCollection(1).DataLabels.Parent

DataLabels.Position Retorna ou define um valor XlDataLabelPosition que representa a posição do rótulo de dados.

ActiveChart.FullSeriesCollection(1).DataLabels.Position = xlLabelPositionAbove

DataLabels.Separator Retorna ou define uma que representa o separador usado para os rótulos de dados em um gráfico. Leitura/gravação.

ActiveChart.FullSeriesCollection(1).DataLabels.Separator = ";"

DataLabels.Shadow Retorna ou define um valor Boolean que determina se o objeto possuirá uma sombra.

ActiveChart.FullSeriesCollection(1).DataLabels.Shadow = True

DataLabels.ShowValue Retorna ou define um Boolean que corresponde a um determinado comportamento de exibição de valores do rótulo de dados do gráfico. True para exibir os valores. False para ocultá-lo. Leitura/gravação.

ActiveChart.FullSeriesCollection(1).DataLabels.ShowValue = True

DataLabels.VerticalAlignment Retorna ou define um valor que representa o alinhamento vertical do objeto especificado.

ActiveChart.FullSeriesCollection(1).DataLabels.VerticalAlignment = xlVAlignBottom