Clase UpBars - las barras ascendentes (Word VBA)

La clase UpBars representa las barras ascendentes de un grupo de gráficos. Para usar una variable de clase UpBars, primero debe ser instanciado, por ejemplo

Dim ubs as UpBars
Set ubs = ActiveDocument.Background.Chart.ChartGroups(1).UpBars

Border

Devuelve el borde del objeto.

Dim cbrBorder As ChartBorder
Set cbrBorder = ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Border

Delete

Elimina el objeto.

ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Delete

Fill

Devuelve un objeto FillFormat para el elemento de gráfico principal que contiene las propiedades de formato de relleno del elemento de gráfico.

Dim As Variant
ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Fill

Format

Devuelve la línea, relleno y efecto de formato para el objeto.

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Format

GetProperty

GetProperty (ID)

Interior

Devuelve el interior del objeto.

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

Devuelve el nombre del objeto.

Dim strName As String
strName = ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Name

Select

Selecciona el objeto.

ActiveDocument.Background.Chart.ChartGroups(1).UpBars.Select

SetProperty

SetProperty (ID, Value)

Dim strID As String: strID =  
ActiveDocument.Background.Chart.ChartGroups(1).UpBars.SetProperty ID:=strID, Value:=

Arguments

Estos son los argumentos con nombre :

ID - String

Value