Clase Trendlines (Word VBA)

La clase Trendlines representa una colección de todos los objetos Trendline para la serie especificada. Para usar una variable de clase Trendlines, primero debe ser instanciado, por ejemplo


Dim trns as Trendlines
Set trns = ActiveDocument.Background.Chart.FullSeriesCollection(1).Trendlines()

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Trendlines en una colección.


Dim trnln As Trendline
For Each trnln In ActiveDocument.Background.Chart.FullSeriesCollection(1).Trendlines()
	
Next trnln

Add

Crea una nueva línea de tendencia.

Add (Type, Order, Period, Forward, Backward, Intercept, DisplayEquation, DisplayRSquared, Name)


With ActiveDocument.InlineShapes(1) 
    If .HasChart Then 
        .Chart.SeriesCollection(1).Trendlines.Add 
    End If 
End With

Arguments

Optional arguments

Los siguientes argumentos son opcionales

Type (XlTrendlineType) - Uno de los valores de enumeración que especifica el tipo de línea de tendencia.

Valores posibles son

xlExponential	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y=ab^x).
xlLinear	Usa la ecuación lineal y = mx + b para calcular los mínimos cuadrados para ajustar los puntos.
xlLogarithmic	Usa la ecuación y = c ln x + b para calcular los mínimos cuadrados para ajustar los puntos.
xlMovingAvg	Usa una secuencia de valores promedio calculados a partir de partes de la serie de datos.
xlPolynomial	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y = ax^6 + bx^5 + cx^4 + dx^3 + ex^2 + fx + g).
xlPower	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y=ax^b).

Order (XlTrendlineType) - El orden de la línea de tendencia.

Valores posibles son

xlExponential	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y=ab^x).
xlLinear	Usa la ecuación lineal y = mx + b para calcular los mínimos cuadrados para ajustar los puntos.
xlLogarithmic	Usa la ecuación y = c ln x + b para calcular los mínimos cuadrados para ajustar los puntos.
xlMovingAvg	Usa una secuencia de valores promedio calculados a partir de partes de la serie de datos.
xlPolynomial	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y = ax^6 + bx^5 + cx^4 + dx^3 + ex^2 + fx + g).
xlPower	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y=ax^b).

Period (XlTrendlineType) - El período de la línea de tendencia.

Valores posibles son

xlExponential	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y=ab^x).
xlLinear	Usa la ecuación lineal y = mx + b para calcular los mínimos cuadrados para ajustar los puntos.
xlLogarithmic	Usa la ecuación y = c ln x + b para calcular los mínimos cuadrados para ajustar los puntos.
xlMovingAvg	Usa una secuencia de valores promedio calculados a partir de partes de la serie de datos.
xlPolynomial	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y = ax^6 + bx^5 + cx^4 + dx^3 + ex^2 + fx + g).
xlPower	Usa una ecuación para calcular los mínimos cuadrados para ajustar los puntos (por ejemplo, y=ax^b).

Forward (Long) - 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.

Backward (Long) - 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.

Intercept (Trendline) - La intersección de la línea de tendencia.

DisplayEquation - Boolean

DisplayRSquared - Boolean

Name - String

Count

Devuelve el número de objetos de la colección.


Dim lngCount As Long
lngCount = ActiveDocument.Background.Chart.FullSeriesCollection(1).Trendlines.Count

Item

Devuelve un solo objeto de una colección.

Item (Index)

Index: Número de índice del objeto.


With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart.SeriesCollection(1).Trendlines.Item(1) 
 .Forward = 5 
 .Backward = .5 
 End With 
 End If 
End With