Método DataColumn.GetProperty (Visio)

Obtém o valor da da propriedade de coluna de dados especificada.

Observação

This Visio object or member is available only to licensed users of Visio Professional 2013.

Sintaxe

expressão. GetProperty (Propriedade)

Expressão Uma expressão que retorna um objeto DataColumn .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Propriedade	Obrigatório	VisDataColumnProperties	A propriedade de coluna de dados a ser obtida. Consulte Observações para obter valores possíveis.

Valor de retorno

Variant

Comentários

Quando você vincula as formas de um desenho do Microsoft Visio aos dados de um conjunto de registros de dados, o Visio mapeia as colunas do conjunto de registros de dados para as linhas na seção Shape Data da planilha ShapeSheet, com cada uma correspondendo a um item de dados da forma.

Observação

Em algumas versões anteriores do Visio, os dados da forma eram chamados de propriedades personalizadas.

As propriedades de coluna de dados mapeiam as colunas de dados para determinadas células na seção Shape Data do ShapeSheet. Por exemplo, passando o método GetProperty para a propriedade DisplayName , que é representada pelo valor enumerado visDataColumnPropertyDisplayName, você pode obter o valor da célula Label na seção Dados de Forma do ShapeSheet para um determinado item de dados de forma. Além disso, essa propriedade define o rótulo do item de dados de forma na caixa de diálogo Dados de Forma , bem como o nome da coluna de dados exibida na janela Dados Externos na interface do usuário do Visio.

Os valores possíveis para o parâmetro Property são declarados em VisDataColumnProperties e mostrados na tabela a seguir.

Constant	Valor	Descrição
visDataColumnPropertyCalendar	3	Calendário da propriedade de coluna de dados.
visDataColumnPropertyCurrency	5	Moeda da propriedade de coluna de dados.
visDataColumnPropertyDisplayName	6	Nome para exibição da propriedade de coluna de dados na interface do usuário.
visDataColumnPropertyHyperlink	8	Se o valor da coluna de dados se tornará um hiperlink na interface do usuário do Visio quando for vinculado a uma forma.
visDataColumnPropertyLangID	2	Identificação de idioma da propriedade de coluna de dados.
visDataColumnPropertyType	1	Tipo da propriedade de coluna de dados.
visDataColumnPropertyUnits	4	Unidades da propriedade de coluna de dados.
visDataColumnPropertyVisible	7	Se a propriedade de coluna de dados estará visível na interface do usuário.

Exemplo

A macro do Microsoft Visual Basic for Applications (VBA) a seguir mostra como usar o método GetProperty para obter o valor da célula Label na seção Dados de Forma para a primeira coluna no conjunto de registros de dados passado para o método e exibi-lo na janela Imediata. Em seguida, ele usa o método SetProperty para definir o valor e exibe o novo valor. A alteração desse valor modifica o rótulo do item de dados da forma na caixa de diálogo Dados da Forma de todas as formas vinculadas às linhas no conjunto de registros de dados.

Para obter e definir o valor da célula Label, a macro passa o valor visDataColumnPropertyDisplayName da enumeração VisDataColumnProperties para os métodos DataColumn.GetProperty e DataColumn.SetProperty.

Antes de executar essa macro, crie pelo menos um conjunto de registros de dados em seu projeto VBA para passar para a 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

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.