AutoGraph Object

 

The AutoGraph object contains graph object settings.

 

Derived from: AutoShape object (All methods and properties of AutoShape apply to this object.)

 

Properties

Axes

BackFill

BackLine

BetweenFillDirection

Depth

FlipZDir

GroupGap

GroupsAdjacent

Legends

Plots

Title

XRotation

YRotation

ZLocked

ZRotation

 

Methods

Add3DLinePlot

Add3DBarChart

Add3DBubblePlot

Add3DStepPlot

Add3DFloatingBar

Add3DFunctionPlot2

Add3DHistogram

Add3DXYZBarChart

Add3DXYZFloatingBarChart

AddAxis

AddBarChart

AddBetweenFill

AddBetweenFillBlank

AddBoxPlot2

AddBubblePlot

AddClassPlot

AddContourDataMap

AddContourFuncMap

AddContourGridMap

AddFloatingBar

AddFunctionPlot2

AddHighLowPlot

AddHistogram

AddLegend

AddLinePlot

AddMagnifier

AddPlotGroup

AddPlotToGroup

AddPolarBarChart

AddPolarClassPlot

AddPolarFunctionPlot

AddPolarPlot

AddPolarVectorPlot

AddQQPlot

AddRoseDiagram

AddStepPlot

AddStiffPlot

AddSummationPlot

AddSurfaceDataMap

AddSurfaceFuncMap

AddSurfaceGridMap

AddTernaryBubblePlot

AddTernaryClassPlot

AddTernaryPlot

AddVectorPlot

AddWindChart

AddXYZClassPlot

AddXYZPlot

AddXYZVectorPlot

BetweenFill

ClearBetweenFill

ClearRotation

ClearTitleOffset

ConvertTo2D

ConvertTo3D

DeletePlotGroup

FillBetweenPlots

MoveTitle

RemovePlotFromGroup

ResetAngles

SetBetweenFillPlotOne

SetBetweenFillPlotTwo

 

Example 1

The following example shows how to add a new line/scatter plot.

 

Sub Main

 'Declares GrapherApp as an object

  Dim GrapherApp As Object

 

 'Creates an instance of the Grapher Application object

 'and assigns it to the variable named "GrapherApp"

  Set GrapherApp = CreateObject("Grapher.Application")

 

 'Make Grapher visible

  GrapherApp.Visible = True

 

 'Declare Docs as Object

  Dim Docs As Object

 

 'Assigns the Documents collection to the

 'variable named "Docs"

  Set Docs = GrapherApp.Documents

 

 'Declare Plot As Object

  Dim Plot As Object

 

 'Creates a new plot window and assigns it

 'to the variable named "Plot"

  Set Plot = Docs.Add(grfPlotDoc)

 

 'Declare Shapes As Object

  Dim Shapes As Object

 

 'Assigns the AutoShapes collection to the

 'variable named "Shapes"

  Set Shapes = Plot.Shapes

 

 'Add LinePlotGraph

  Dim Graph1 As Object

  Set Graph1 = Shapes.AddLinePlotGraph(GrapherApp.Path + "\samples\bar chart orientations.dat")

End Sub

 

Example 2

The following example shows how to create a graph with a multiple sheet Excel file.

 

Plot.Shapes.AddLinePlotGraph_

("C:\Program Files\Golden Software\Grapher 13\Samples\multiple sheet.xls!Sheet2",1,2)