ACC: How to Use Automation to Set Graph Trend Lines

ID: Q154581

The information in this article applies to:

SUMMARY

Advanced: Requires expert coding, interoperability, and multiuser skills.

This article shows you how to use Automation to add, remove, and set trend lines on a Microsoft Graph object.

This article assumes that you are familiar with Visual Basic for Applications and with creating Microsoft Access applications using the programming tools provided with Microsoft Access. For more information about Visual Basic for Applications, please refer to your version of the "Building Applications with Microsoft Access" manual.

NOTE: A demonstration of the technique used in this article can be seen in the sample file, Grphsm97.exe. For information about how to obtain this sample file, please see the following article in the Microsoft Knowledge Base:

   ARTICLE-ID: Q186855
   TITLE     : ACC97: Microsoft Access 97 Sample Graphs Available on MSL

MORE INFORMATION

Different types of trend measurements exist. You can use the Type property to select a specific trend to use in your graph. You can also use the Add method to add trend lines to your graph, or use the Delete method to remove trend lines. Trend lines only apply to two-dimensional graphs of type "Bar," "Column," "Line," and "Scatter." The following examples use a bar graph.

Example - Add a Trendline and set its Type

The following example adds a trend line to the first series of data and sets it to be of type Polynomial:

  1. Open the sample database Northwind.mdb.

  2. Create a new form not based on any table or query in Design view.

  3. On the Insert menu, click Chart, and then click in the detail section
     of the form to start the Chart Wizard.

  4. In the "Which table or query would you like to use to create your
     chart?" dialog box, click Queries, and then select the Employee Sales
     By Country query. Click Next.

  5. In the "Which fields contain the data you want for the chart?" dialog
     box, add the Country and SaleAmount fields to the Fields For Chart
     box. Click Finish. Your graph will appear in the form.

  6. On the View menu, click Properties. Select the Graph so that you are
     viewing the graph object's properties. Set the Name property to
     MyGraph.

  7. Add a command button to the form with the following properties:

       Command button:
          Caption: Add Trend Line
          OnClick: =AddTrendLine()

  8. On the View menu, click Code to view the form's module.

  9. Add the following code to the form's module:

       Function AddTrendLine()
         Dim GraphObj As Object
         Set GraphObj = Me![MyGraph].Object.Application.Chart
         GraphObj.SeriesCollection(1).TrendLines.Add
         GraphObj.SeriesCollection(1).TrendLines(1).Type = 3
       End Function

 10. Switch the form to Form view. When prompted for a beginning and ending
     date, enter 1/1/94 and 1/1/95 respectively. Click the Add Trend Line
     button. Note the trend line added to the chart.

Example - Remove a Data Series Trendline

The following example removes the trend line from the first series of data being graphed in the earlier example:

1. Use the form created in the first example, and add another command

   button with the following properties:

      Command button:
         Caption: Remove Trend Line
         OnClick: =RemoveTrendLine()

2. On the View menu, click Code to view the form's module.

3. Add the following code to the form's module:

      Function RemoveTrendLine()
         Dim GraphObj As Object
         Set GraphObj = Me![MyGraph].Object.Application.Chart
         GraphObj.SeriesCollection(1).TrendLines(1).Delete
      End Function

4. Switch the form to Form view. When prompted for a beginning and ending
   date, enter 1/1/94 and 1/1/95 respectively.

5. Click the Add Trend Line button to add the trend line to the chart.

6. Click the Remove Trend Line button. Note the trend line is removed from

   the chart.

REFERENCES

For information about obtaining a Help file for Microsoft Graph, please see the following article in the Microsoft Knowledge Base:

   ARTICLE-ID: Q128364
   TITLE     : Microsoft Graph VBA Help File Available on MSL

For more information about trend lines, search the Help Index in the Microsoft Graph VBA Help file for "Trendline object."

For more information about Automation, search the Help Index for "Automation."

For information about obtaining a Help file with examples of Automation between Microsoft Access and Microsoft Graph, please see the following article in the Microsoft Knowledge Base:

   ARTICLE-ID: Q148124
   TITLE     : OLE Automation Help File (95) Available on MSL

Additional query words: regression OLE

Keywords          : kbinterop kbtool IntpGrph 
Version           : 7.0 97
Platform          : WINDOWS
Hardware          : x86
Issue type        : kbhowto

Last Reviewed: November 21, 1998