Método Masters.AddEx (Visio)
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.