Clase Trendline (PowerPoint VBA)

La clase Trendline representa una línea de tendencia de un gráfico.

Los principales procedimientos de la clase Trendline son Delete, Select y Trendlines.Add

Set

Para usar una variable de clase Trendline, primero debe ser instanciado, por ejemplo

Dim trnln as Trendline
Set trnln = ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase Trendline : Trendlines.Item, Trendlines.Add y Series.Trendlines

Temas

Algunos procedimientos de esta clase se han agrupado en temas y se describen en páginas temáticas separadas

Sort/Order with its procedures Border y Order
Format with its procedures ClearFormats y Format
Display/Show with its procedures DisplayEquation y DisplayRSquared

Métodos

Los principales métodos de la clase Trendline son

Delete - Elimina el objeto.

ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines(1).Delete

Select - Selecciona el objeto.

ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines(1).Select

Trendlines.Add - Crea una nueva línea de tendencia.

Dim trnln As Trendline
Set trnln = ActivePresentation.Slides(1).Shapes(1).Chart.FullSeriesCollection(1).Trendlines.Add()

Otros Métodos

SetProperty -

Dim strId As String: strId = 
ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines(1).SetProperty Id:=strId, Value:=

Propiedades

Backward2 Devuelve o establece el número de períodos (o unidades en un gráfico de dispersión) que la línea de tendencia se extiende hacia atrás. Doublede lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).Chart.FullSeriesCollection(1).Trendlines(1).Backward2 = 5

DataLabel Devuelve el rótulo de datos asociado a la línea de tendencia. DataLabel de solo lectura.

Dim dtlDataLabel As DataLabel
Set dtlDataLabel = ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines(1).DataLabel

Forward2 Devuelve o establece el número de períodos (o unidades en un gráfico de dispersión) que la línea de tendencia se extiende hacia delante. Doublede lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).Chart.FullSeriesCollection(1).Trendlines(1).Forward2 = 5

Index Devuelve el número de índice del objeto contenido en el conjunto de objetos similares. Long de sólo lectura.

Dim lngIndex As Long
lngIndex = ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines(1).Index

Intercept Devuelve o establece el punto en que la línea de tendencia corta al eje de valores. Doublede lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).Chart.FullSeriesCollection(1).Trendlines(1).Intercept = 5

InterceptIsAuto True si el punto en que la línea de tendencia corta al eje de valores lo determina automáticamente la regresión. Boolean de lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).Chart.FullSeriesCollection(1).Trendlines(1).InterceptIsAuto = True

Name Devuelve o establece el nombre del objeto. Cadena de lectura y escritura.

ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines(1).Name =

NameIsAuto True si Microsoft Word determina automáticamente el nombre de la línea de tendencia. Boolean de lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).Chart.FullSeriesCollection(1).Trendlines(1).NameIsAuto = True

Parent Devuelve al objeto primario del objeto especificado. Objetode solo lectura.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines(1).Parent

Period Devuelve o establece el período de la línea de tendencia de Media móvil. Long de lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).Chart.FullSeriesCollection(1).Trendlines(1).Period = 5

Type Devuelve o establece el tipo de línea de tendencia. XlTrendlineType de lectura y escritura.

ActivePresentation.Slides(1).Shapes(1).Chart.FullSeriesCollection(1).Trendlines(1).Type = xlExponential

Trendlines.Count Devuelve el número de objetos de la colección. Long de sólo lectura.

Dim lngCount As Long
lngCount = ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines.Count

Trendlines.Parent Devuelve al objeto primario del objeto especificado. Objetode solo lectura.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).Trendlines.Parent