Método Pages.GetNames (Visio)

Retorna os nomes de todos os itens em uma coleção.

Sintaxe

expressão. GetNames (localeSpecificNameArray())

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
localeSpecificNameArray()	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 GetNames obtiver êxito, localeSpecificNameArray() retornará uma matriz unidimensional de n sequências de caracteres indexadas de 0 a n - 1, onde n é igual à propriedade Count do objeto. localeSpecificNameArray() é um parâmetro externo alocado pelo método GetNames, 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 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 a seguir mostra como usar o método GetNames para obter os nomes de todos os objetos Master na coleção Masters do documento ativo e imprimi-los na janela Immediate.

 
Public Sub GetNames_Example() 
 
 Dim strMasterNames() As String 
 Dim intLowerBound As Integer 
 Dim intUpperBound As Integer 
 
 ActiveDocument.Masters.GetNames 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.