Método GraphicItem.SetExpression (Visio)

Define o valor da cadeia de caracteres de expressão que faz parte da regra de um objeto GraphicItem , na qual os dados de forma (propriedades personalizadas) são avaliados.

Observação

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

Sintaxe

expression. SetExpression( _Field_ , _Expression_ )

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Field	Obrigatório	VisGraphicField	O rótulo ou a fórmula do principal campo de dados (coluna) atribuído ao GraphicItem. Consulte comentários para os valores possíveis.
Expressão.	Obrigatório	String	A expressão ShapeSheet associada ao parâmetro Field.

Valor de retorno

Nada

Comentários

O parâmetro Field deve ser um dos seguintes valores da enumeração VisGraphicField, declarada na Biblioteca de Tipos do Microsoft Visio.

Constant	Valor	Descrição
visGraphicPropertyLabel	1	O rótulo de um item de dados da forma.
visGraphicExpression	2	A fórmula do ShapeSheet de um item de dados da forma.

Ao passar pelo método SetExpression um rótulo shape-data-item (ou seja, quando você passa visGraphicPropertyLabel para o parâmetro Field), você deve incluir o rótulo dentro de chaves{} (). Por exemplo, para passar o nome do item de dados de forma "Custo", é necessário digitá-lo deste modo: {Custo}.

Referencie os dados de forma de uma forma diferente daquela à qual o gráfico de dados é aplicado passando o nome da forma seguido por um ponto de exclamação (!) e, em seguida, o nome do campo. No exemplo a seguir, para se referir à largura da forma Ellipse.34, você pode usar esta sintaxe:

vsoGraphicItem.SetExpression visGraphicExpression, "Ellipse.34!Width"

Antes de editar um item gráfico, incluindo definir sua cadeia de expressão, você deve usar o método Master.Open para abrir para editar uma cópia do mestre gráfico de dados cuja coleção GraphicItems o item gráfico pertence. Após ter definido a expressão do item gráfico e realizado as demais edições desejadas, use o método Master.Close para confirmar as alterações.

Exemplo

A seguinte macro do Microsoft VBA (Visual Basic for Applications) mostra como usar o método SetExpression para definir o valor da cadeia de caracteres da expressão de um item gráfico de dados. Ele abre uma cópia do objeto Mestre do tipo visTypeDataGraphic (comumente chamado de gráfico de dados) chamado "Data Graphic", e define a expressão do primeiro item gráfico na coleção GraphicItems do gráfico de dados para exibir a largura de qualquer forma à qual o gráfico de dados é aplicado.

Observação

Para determinar o nome de um mestre de gráfico de dados existente, mova o mouse sobre o mestre no painel de tarefas Gráficos de Dados na interface do usuário do Visio.

Em seguida, o método fecha o mestre e usa o método GetExpression para obter a expressão mais recentemente aplicada ao item gráfico. Finalmente, imprime o tipo de campo e o valor da expressão na janela Immediate.

A macro pressupõe que exista um gráfico de dados chamado "Gráfico de Dados" no documento atual. Para obter mais informações sobre como adicionar um mestre gráfico de dados à coleção Masters do documento atual, consulte Masters.AddEx.

Public Sub SetExpression_Example() 
 
    Dim vsoMaster As Visio.Master 
    Dim vsoMasterCopy As Visio.Master 
    Dim vsoGraphicItem As Visio.GraphicItem 
    Dim strExpression As String 
    Dim fieldType As VisGraphicField 
 
    Set vsoMaster = Visio.ActiveDocument.Masters("Data Graphic") 
    Set vsoMasterCopy = vsoMaster.Open 
    Set vsoGraphicItem = vsoMasterCopy.GraphicItems(1) 
       
    vsoGraphicItem.SetExpression visGraphicExpression, "Width" 
    vsoMasterCopy.Close 
     
    vsoMaster.GraphicItems(1).GetExpression fieldType, strExpression 
     
    Debug.Print "Field type is "; fieldType 
    Debug.Print "Expression is "; strExpression 
     
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.