Compartilhar via

Método Masters.AddEx (Visio)

  • Artigo

Adiciona um novo objeto Master do tipo especificado à coleção Masters de um documento do Microsoft Visio.

Sintaxe

expression. AddEx( _Type_ )

Expressão Uma variável que representa um objeto Masters .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Type Obrigatório VisMasterTypes Um tipo de mestre da enumeração VisMasterTypes. Consulte comentários para os valores possíveis.

Valor de retorno

Master

Comentários

Para o parâmetro Type, passe um dos seguintes membros de VisMasterTypes, declarado na biblioteca de tipos do Visio.

Constant Valor Descrição
visTypeMaster 1 Cria um mestre da forma.
visTypeFillPattern 2 Cria um mestre de padrão de preenchimento.
visTypeLinePattern 3 Cria um mestre de padrão de linha.
visTypeLineEnd 4 Cria um mestre de extremidade de linha.
visTypeDataGraphic 5 Cria um mestre de gráfico de dados.
visTypeThemeColors 6 Cria um mestre de cores de tema.
visTypeThemeEffects 7 Cria um mestre de efeitos de tema.

O método AddEx retorna o objeto Master adicionado.

Se o mestre adicionado for do tipo visTypeDataGraphic, o Visio o nomeará como "Gráfico de Dados" e, se não for o primeiro gráfico de dados da coleção Masters do documento, o Visio acrescentará o número de índice do mestre da coleção ao nome. Por exemplo, se já houvesse 5 objetos na coleção Masters , um dos quais era um gráfico de dados, o próximo gráfico de dados adicionado seria chamado de "Data Graphic.6".

O nomenclatura de mestres dos tipos visTypeThemeColors e visTypeThemeEffects segue o mesmo padrão, e o novos mestres resultantes são nomeados "Cores de Tema. x " e "Efeitos temáticos. x " respectivamente, em que x é o número de índice na coleção. Os mestres de todos os outros tipos são simplesmente denominados "Master. x ".

Exemplo

A macro a seguir do Microsoft Visual Basic for Applications (VBA) mostra como usar o método AddEx para adicionar um novo objeto Master do tipo visTypeDataGraphic à coleção Masters do documento ativo.

Public Sub AddEx_Example() 
 
    Dim vsoMaster As Visio.Master 
     
    Set vsoMaster = Visio.ActiveDocument.Masters.AddEx(visTypeDataGraphic) 
     
    Debug.Print vsoMaster.Name 
 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.