Propiedad Document.AlternateNames (Visio)

Obtiene o establece los nombres alternativos de un documento. Lectura y escritura.

Sintaxis

expresión. AlternateNames

Expresión Variable que representa un objeto Document .

Valor devuelto

Cadena

Comentarios

La aplicación almacena los nombres de los documentos en las situaciones siguientes:

• Las plantillas almacenan nombres de galerías de símbolos. Por ejemplo, la plantilla Diagrama de flujo básico almacena los nombres de las galerías de símbolos Formas para diagramas de flujo básicos.vss y Backgrounds.vss. Estas galerías se abren con la plantilla Diagrama de flujo básico.

• Los accesos directos de patrón almacenan nombres de galerías de símbolos. Por ejemplo, un acceso directo para la forma Datos almacena el nombre de la galería de símbolos en la que se almacena la forma Datos : Formas básicas de diagrama de flujo.vss.

Cuando la aplicación abre un documento o tiene acceso a la colección del objeto Document, usa el nombre del documento. Si Microsoft Office Visio no puede encontrar dicho nombre, busca los nombres alternativos de las galerías de símbolos que se encuentran en la ruta de acceso correcta. (Para agregar una ruta de acceso, haga clic en la pestaña Archivo , en Opciones, en Opciones avanzadasy, a continuación, en General, haga clic en Ubicaciones de archivo). Por ejemplo, supongamos que ha creado la galería de símbolos denominada "Nuevas formas 2008.vss". Al año siguiente, revisó la galería de símbolos y la cambió por "Nuevas formas 2009.vss". Las plantillas que abrieron New Shapes 2008.vss ahora deben abrir Nuevas formas 2009.vss. Para ello, establezca la propiedad AlternateNames de New Shapes 2009.vss en "New Shapes 2008.vss". El siguiente código de Microsoft Visual Basic muestra una manera de hacerlo.

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

La propiedad AlternateNames está vacía hasta que se establece mediante la automatización. Cada uno de los nombres alternativos de la cadena debe contener el nombre del archivo, pero no la información de la carpeta. También puede incluir comentarios entre corchetes angulares (<>), ya que la aplicación omite cualquier cosa entre corchetes angulares. Por ejemplo, podría usar el código siguiente para establecer la propiedad AlternateNames .

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

Ejemplo:

La macro siguiente muestra cómo obtener y establecer la propiedad AlternateNames del documento actual. Muestra que la propiedad está vacía hasta que no se establece.

 
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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.