Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Define o valor da cadeia de expressão que faz parte da regra de um objeto GraphicItem , em relação à qual os dados da 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 devolve 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. |
Quando transmite ao método SetExpression uma etiqueta shape-data-item (ou seja, quando passa visGraphicPropertyLabel para o parâmetro Campo), tem de colocar a etiqueta entre chavetas ({}). Por exemplo, para passar o nome do item de dados de forma "Custo", é necessário digitá-lo deste modo: {Custo}.
Referencie os dados da forma de uma forma diferente daquela à qual o gráfico de dados é aplicado ao transmitir o nome da forma seguido de 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 poder editar um item gráfico, incluindo a definição da respetiva cadeia de expressão, tem de utilizar o método Master.Open para abrir para editar uma cópia do gráfico de dados master a cuja coleção GraphicItems pertence ao item gráfico. 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. Abre uma cópia do objeto Principal do tipo visTypeDataGraphic (normalmente denominado gráfico de dados) com o nome "Gráfico de Dados" e, em seguida, define a expressão do primeiro item gráfico na coleção GraphicItems do gráfico de dados para apresentar 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 existe um gráfico de dados com o nome "Gráfico de Dados" no documento atual. Para obter mais informações sobre como adicionar um gráfico de dados master à 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.