Masters.AddEx Method

  • Article
Visio Automation Reference

Adds a new Master object of the specified type to the Masters collection of a Microsoft Office Visio document.

Version Information
 Version Added:  Visio 2007

Syntax

expression.AddEx(Type)

expression   A variable that represents a Masters object.

Parameters

Name Required/Optional Data Type Description
Type Required VisMasterTypes A master type from the VisMasterTypes enumeration. See Remarks for possible values.

Return Value
Master

Remarks

For the Type parameter, pass one of the following members of VisMasterTypes, which is declared in the Visio type library.

Constant Value Description

visTypeMaster

1

Creates a shape master.

visTypeFillPattern

2

Creates a fill-pattern master.

visTypeLinePattern

3

Creates a line-pattern master.

visTypeLineEnd

4

Creates a line-end master.

visTypeDataGraphic

5

Creates a data graphic master.

visTypeThemeColors

6

Creates a theme-colors master.

visTypeThemeEffects

7

Creates a theme-effects master.

The AddEx method returns the Master object added.

If the master added is of type visTypeDataGraphic, Visio names it "Data Graphic", and if it is not the first data graphic in the Masters collection of the document, Visio appends the index number of the master in the collection to the name. For example, if there were already 5 objects in the Masters collection, one of which was a data graphic, the next data graphic added would be named "Data Graphic.6".

Naming of masters of type visTypeThemeColors and visTypeThemeEffects follows the same pattern, and the resulting new masters are named "Theme Colors.x" and "Theme Effects.x" respectively, where x is the index number in the collection. Masters of all other types are simply named "Master.x".

Example

The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the AddEx method to add a new Master object of type visTypeDataGraphic to the Masters collection of the active document.

Visual Basic for Applications 
  Public Sub AddEx_Example()

Dim vsoMaster As Visio.Master

Set vsoMaster = Visio.ActiveDocument.Masters.AddEx(visTypeDataGraphic)

Debug.Print vsoMaster.Name



End Sub

See Also