Classe UpBars - barras superiores (Word VBA)
A classe UpBars representa as barras superiores em um grupo de gráficos. Para usar uma variável de classe UpBars, ela primeiro precisa ser instanciada por exemplo
Dim ubs as UpBars
Set ubs = ActiveDocument.Background.Chart.ChartGroups(1).UpBars
Border
Retorna a borda do objeto. Somente leitura ChartBorder.
Dim cbrBorder As ChartBorder
Set cbrBorder = ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Border
Delete
Exclui o objeto.
ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Delete
Fill
Retorna um objeto FillFormat para o elemento de gráfico pai que contém as propriedades de formatação de preenchimento para o elemento de gráfico. Somente leitura.
Dim As Variant
ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Fill
Format
Retorna a linha, preenchimento e efeito da formatação do objeto. Somente leitura ChartFormat.
Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Format
GetProperty
GetProperty (ID)
Interior
Retorna o interior do objeto. Interior somente leitura.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
With .Chart.ChartGroups(1)
.HasUpDownBars = True
.DownBars.Interior.ColorIndex = 3
.UpBars.Interior.ColorIndex = 4
End With
End If
End With
Name
Retorna o nome do objeto. Cadeia de caracteressomente leitura.
Dim strName As String
strName = ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Name
Select
Seleciona o objeto.
ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Select
SetProperty
Dim strID As String: strID =
ActiveDocument.Background.Chart.ChartGroups(1).UpBars.SetProperty ID:=strID, Value:=
Arguments
O seguinte argumento é opcional
ID - String
Value