AddextendedDurovClassGraph Method

The AddextendedDurovClassGraph method creates a new extended Durov class plot. Returns an AutoGraph object.

Syntax

object.AddextendedDurovClassGraph( worksheet, xCationCol, yCationCol, zCationCol, xAnionCol, yAnionCol, zAnionCol, pH, tDS, classCol, id )

 

Parameter	Type	Description
worksheet	String	required, full path and file name of the data
xCationCol	Variant	optional, cation X column
yCationCol	Variant	optional, cation Y column
zCationCol	Variant	optional, cation Z column
xAnionCol	Variant	optional, anion X column
yAnionCol	Variant	optional, anion Y column
zAnionCol	Variant	optional, anion Z column
pH	Variant	optional, pH data column
tDS	Variant	optional, TDS data column
classCol	Variant	optional, class column
id	Variant	optional, graph name

 

Remarks

The AddextendedDurovClassGraph method creates an extended Durov class plot, which consists of two ternary class plots, a square class plot, a pH class plot, and a TDS class plot. The example shows how to set the references to the AutoTernaryClassPlot objects.

Example

This example shows how to create a piper diagram and set the references to the component plots.

'Create Durov reference

Dim extendedDurovClass as Object

 

'Create the Durov plot and set the reference

Set extendedDurovClass = Shapes.AddextendedDurovClassGraph(GrapherApp.Path + "\samples\DurovdData.xlsx",2,3,4,5,6,7,9,8,1)

 

'Set the Cation plot reference

Dim Cation as Object

Set Cation = extendedDurovClass.Plots.Item(1)

 

'Set the Anion plot reference

Dim Anion as Object

Set Anion = extendedDurovClass.Plots.Item(2)

 

'Set the Square plot reference

Dim Square as Object

Set Square = extendedDurovClass.Plots.Item(3)

 

'Set the pH plot reference

Dim pH as Object

Set pH = extendedDurovClass.Plots.Item(4)

 

'Set the TDS plot reference

Dim TDS as Object

Set TDS = extendedDurovClass.Plots.Item(5)

 

 

Used by: AutoShapes collection