Método Masters.GetNamesU (Visio)
Retorna os nomes universais de todos os itens em uma coleção.
Sintaxe
expressão. GetNamesU (localeIndependentNameArray())
Expressão Uma variável que representa um objeto Masters .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| localeIndependentNameArray() | Obrigatório | String | Parâmetro externo. Uma matriz que recebe os nomes dos membros do objeto indicado. |
Valor de retorno
Nada
Comentários
Se o método GetNamesU obtiver êxito, localeIndependentNameArray() retornará uma matriz unidimensional de n sequências de caracteres indexadas de 0 a n - 1, onde n é igual à propriedade Count do objeto. localeIndependentNameArray() é um parâmetro externo alocado pelo método GetNamesU, que passa a propriedade de volta ao chamador. Por fim, o chamador deve executar o procedimento SafeArrayDestroy na matriz retornada. Observe que o procedimento SafeArrayDestroy tem o efeito colateral de libertar as sequências de caracteres referenciadas pelas entradas da matriz. (O Microsoft Visual Basic e o Microsoft Visual Basic for Applications (VBA) cuidam disso para você.)
Observação
A partir do Microsoft Visio 2000, você pode usar nomes locais e universais para se referir a formas, mestres, documentos, páginas, linhas, complementos, células, hiperlinks, estilos, fontes, atalhos mestre, objetos UI e camadas do Visio. Quando um usuário nomeia uma forma, por exemplo, o usuário está especificando um nome local. A partir do Microsoft Office Visio 2003, a planilha ShapeSheet exibe apenas nomes universais em fórmulas de células e valores. (Em versões anteriores, os nomes universais não eram visíveis na interface do usuário.).
Como desenvolvedor, você poderá usar nomes universais em um programa quando não quiser alterar um nome a cada vez que uma solução for localizada. Use o método GetNames para obter o nome local de mais de um objeto. Use o método GetNamesU para obter o nome universal de mais de um objeto.
Exemplo
A macro do VBA a seguir mostra como usar o método GetNamesU para obter os nomes de todos os objetos Master na coleção Masters do documento ativo e imprimi-los na janela Immediate.
Public Sub GetNamesU_Example()
Dim strMasterNames() As String
Dim intLowerBound As Integer
Dim intUpperBound As Integer
ActiveDocument.Masters.GetNamesU strMasterNames
intLowerBound = LBound(strMasterNames)
intUpperBound = UBound(strMasterNames)
Debug.Print ActiveDocument; " Lower bound:"; intLowerBound; "Upper bound:"; intUpperBound
While intLowerBound <= intUpperBound
Debug.Print strMasterNames (intLowerBound)
intLowerBound = intLowerBound + 1
Wend
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.