Método Shape.IsCustomPropertyLinked (Visio)

Devuelve si la fila de datos de formas (propiedad personalizada) de la sección Datos de formas de la hoja de cálculo ShapeSheet de la forma está vinculada a una fila de datos en el conjunto de registros de datos especificado.

Nota:

Este objeto o miembro Visio solo se encuentra disponible para los usuarios con licencia de Visio Professional 2013.

Sintaxis

expresión. IsCustomPropertyLinked( _DataRecordsetID_ , _CustomPropertyIndex_ )

Expresión Expresión que devuelve un objeto Shape .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
DataRecordsetID	Necesario	Long	Identificador del conjunto de registros de datos que contiene la fila de datos.
CustomPropertyIndex	Necesario	Long	Índice de la fila de datos de formas (propiedad personalizada) de la sección Datos de formas de la hoja de cálculo ShapeSheet de la forma.

Valor devuelto

Booleano

Comentarios

Llame a este método antes de llamar al método GetCustomPropertyLinkedColumn para asegurarse de que el elemento de datos de forma (fila de propiedad personalizada) está realmente vinculado a una columna de datos.

Nota:

En algunas versiones anteriores de Visio, los datos de formas se denominaban propiedades personalizadas.

Saber cómo están vinculadas las formas a los datos permite evitar la aparición de conflictos y la ruptura de vínculos al actualizar los datos de uno o varios conjuntos de registros de datos.

Ejemplo:

La siguiente macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo usar el método IsCustomPropertyLinked para determinar si la fila de propiedades personalizadas de una forma está vinculada a una fila de datos de un conjunto de registros de datos.

Antes de ejecutar esta macro, agregue al menos un conjunto de registros de datos a la colección DataRecordsets del documento. La macro quita una forma y, a continuación, comprueba si el primer elemento de datos de forma de la forma está vinculado a una fila de datos en el conjunto de registros de datos agregado más recientemente a la colección, imprimiendo el resultado en la ventana Inmediato. Se producirá un error en la prueba, ya que la forma no se ha vinculado a los datos. A continuación, la forma se vincula a los datos del conjunto de registros de datos agregado más recientemente y la prueba se vuelve a ejecutar.

Public Sub IsCustomPropertyLinked_Example() 
 
    Dim vsoDataRecordset As Visio.DataRecordset 
    Dim vsoShape As Visio.Shape 
    Dim intCount As Integer 
    Dim boolIsLinked As Boolean 
         
    intCount = Visio.ActiveDocument.DataRecordsets.Count 
    Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount) 
     
    Set vsoShape = ActivePage.DrawRectangle(2, 2, 4, 4) 
     
    boolIsLinked = vsoShape.IsCustomPropertyLinked(vsoDataRecordset.ID, 1) 
     
    Debug.Print boolIsLinked 
     
    vsoShape.LinkToData vsoDataRecordset.ID, 1, True 
    boolIsLinked = vsoShape.IsCustomPropertyLinked(vsoDataRecordset.ID, 1) 
     
    Debug.Print boolIsLinked 
     
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.