Método DataColumn.GetProperty (Visio)

Obtiene el valor de la propiedad de columna de datos especificados.

Nota:

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

Sintaxis

expresión. GetProperty (propiedad)

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

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Propiedad	Obligatorio	VisDataColumnProperties	Propiedad de columna de datos que se va a obtener. Consulte Comentarios para ver los valores posibles.

Valor devuelto

Variant

Comentarios

Al vincular formas de un dibujo de Microsoft Visio con datos de un conjunto de registros de datos, Visio asigna columnas del conjunto de registros de datos a las filas de la sección Datos de formas de la hoja de cálculo ShapeSheet, cada una de las cuales se corresponde con un elemento de datos de formas.

Nota:

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

Las propiedades de columnas de datos asignan columnas de datos a algunas celdas de la sección Datos de formas de ShapeSheet. Por ejemplo, al pasar el método GetProperty la propiedad DisplayName , que se representa mediante el valor enumerado visDataColumnPropertyDisplayName, puede obtener el valor de la celda Label en la sección Datos de formas de ShapeSheet para un elemento de datos de forma determinado. Además, esa propiedad establece la etiqueta del elemento de datos de forma en el cuadro de diálogo Datos de formas, así como el nombre de la columna de datos que se muestra en la ventana Datos externos de la interfaz de usuario de Visio.

Los posibles valores del parámetro Property se declaran en VisDataColumnProperties y se muestran en la siguiente tabla.

Constante	Valor	Descripción
visDataColumnPropertyCalendar	3	Calendario de la propiedad de columna de datos.
visDataColumnPropertyCurrency	5	Moneda de la propiedad de columna de datos.
visDataColumnPropertyDisplayName	6	Nombre para mostrar de la propiedad de columna de datos de la IU.
visDataColumnPropertyHyperlink	8	Si el valor de la columna de datos se convierte en un hipervínculo de la IU de Visio cuando se vincula a una forma.
visDataColumnPropertyLangID	2	Identificador de idioma de la propiedad de columna de datos.
visDataColumnPropertyType	1	Tipo de la propiedad de columna de datos.
visDataColumnPropertyUnits	4	Unidades de la propiedad de columna de datos.
visDataColumnPropertyVisible	7	Si la propiedad de columna de datos se ve en la IU.

Ejemplo:

La siguiente macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo usar el método GetProperty para obtener el valor de la celda Label en la sección Datos de formas de la primera columna del conjunto de registros de datos pasado al método y mostrarlo en la ventana Inmediato. A continuación, usa el método SetProperty para establecer el valor y muestra el nuevo valor. Si se cambia este valor, se cambia la etiqueta del elemento de datos de formas del cuadro de diálogo Datos de formas de todas las formas vinculadas a las filas del conjunto de registros de datos.

Para obtener y establecer el valor de la celda Etiqueta, la macro pasa el valor visDataColumnPropertyDisplayName desde la enumeración VisDataColumnProperties a los métodos DataColumn.GetProperty y DataColumn.SetProperty.

Antes de ejecutar esta macro, cree al menos un conjunto de registros de datos en el proyecto de VBA para pasar a la macro.

 
Public Sub GetProperty_Example(vsoDataRecordset As Visio.DataRecordset) 
    Dim strPropertyName As String 
    Dim strNewName As String 
    Dim vsoDataColumn As Visio.DataColumn 
 
    strNewName = "New Property Name" 
    Set vsoDataColumn = vsoDataRecordset.DataColumns(1) 
 
    strPropertyName = vsoDataColumn.GetProperty(visDataColumnPropertyDisplayName) 
    Debug.Print strPropertyName 
 
    vsoDataColumn.SetProperty visDataColumnPropertyDisplayName, strNewName 
    strPropertyName = vsoDataColumn.GetProperty(visDataColumnPropertyDisplayName) 
    Debug.Print strPropertyName 
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.