Example: SaveTemplate method

Private Sub SaveMyTemplate()
TrendX1.SaveTemplate "Basic"
End Sub
Private Sub LoadMyTemplate()
With Trend1
' Set the template options to load
.TemplateLoadOptions1 = _
rstTemplateLineColor Or _
rstTemplateXAxisGridColor Or _
rstTemplateYAxisGridColor Or _
rstTemplateDisplayBackground
' Could also use
' .TemplateLoadOptions1 = &H10820000&
.TemplateLoadOptions2 = _
rstTemplateCustomColors Or _
rstTemplateFontInformation Or _
rstTemplateFontSize
.LoadTemplate "Basic"
End With
End Sub