Compartilhar via

Propriedade Document.AlternateNames (Visio)

  • Artigo

Obtém ou define os nomes alternativos de um documento. Leitura/gravação.

Sintaxe

expressão. Nomes Alternativos

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

Valor de retorno

Cadeia de caracteres

Comentários

O aplicativo armazena nomes de documentos nas seguintes situações:

  • Os modelos armazenam nomes de estênceis. Por exemplo, o modelo Fluxograma Básico armazena os nomes dos estênceis Basic Flowchart Shapes.vss e Backgrounds.vss. Esses estênceis são abertos com o modelo Fluxograma Básico.

  • Os atalhos do mestre armazenam nomes de estênceis. Por exemplo, um atalho para a forma De dados armazena o nome do estêncil no qual a forma de dados é armazenada: Formas básicas de fluxograma.vss.

Quando o aplicativo abre um documento ou acessa a coleção do objeto Document, ele usa o nome do documento. Se o Microsoft Visio não puder localizar o nome do documento, ele procurará nomes alternativos para os estênceis que estão no caminho correto. (Para adicionar um caminho, clique na guia Arquivo , clique em Opções, clique em Avançado e, em Geral, clique em Locais de Arquivo.) Por exemplo, suponha que você tenha criado o estêncil chamado "Novas Formas 2008.vss". No ano seguinte, você revisou o estêncil e renomeou-o como "Novas Formas 2009.vss". Todos os modelos que abriram o New Shapes 2008.vss agora devem abrir o New Shapes 2009.vss. Para fazer isso, defina a propriedade AlternateNames de New Shapes 2009.vss como "New Shapes 2008.vss". O código do Microsoft Visual Basic a seguir mostra uma maneira de fazer isso.

Visio.Documents("New Shapes 2009.vss").AlternateNames = "New Shapes 2008.vss"

A propriedade AlternateNames está vazia até que você a defina usando Automation. Cada nome alternativo na sequência de caracteres deve conter o nome do arquivo, mas não informações da pasta. Você também pode incluir comentários em colchetes de ângulo (<>), pois o aplicativo ignora qualquer coisa em colchetes de ângulo. Por exemplo, você pode usar o código a seguir para definir a propriedade AlternateNames .

Visio.Documents("HRShapes.vss").AlternateNames = "Human Resources Shapes.vss; <old name> HRDept Shapes.vss"

Exemplo

A macro a seguir mostra como obter e definir a propriedade AlternateNames do documento atual. Ela demonstra que a propriedade está vazia até que você a defina.

 
Public Sub AlternateNames_Example() 
  
    'Get the AlternateNames property of the document.  
    Debug.Print "Alternate name is: "; ThisDocument.AlternateNames 
 
    'Set the AlternateNames property of the document.  
    ThisDocument.AlternateNames = "Test Shapes.vss"  
    Debug.Print "Alternate name is: "; ThisDocument.AlternateNames  
 
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.