Evento Cell.CellChanged (Visio)

Ocorre após o valor de uma célula de um documento ser alterado.

Sintaxe

expressão. CellChanged (Célula)

expressão Uma variável que representa um objeto De célula .

Parâmetros

Comentários

Se estiver usando o Microsoft Visual Basic ou o Visual Basic for Applications (VBA), a sintaxe deste tópico descreverá uma maneira comum e eficiente de lidar com eventos.

Se quiser criar os seus próprios objetos de Evento , utilize o método Add ou AddAdvise . Para criar um objeto Event que execute um complemento, use o método Add, uma vez que ele aplica-se à coleção EventList. Para criar um objeto Event que receba notificação, use o método AddAdvise. Para localizar um código de evento que você deseja criar, consulte Códigos de eventos.

Para obter considerações sobre o desempenho, o conjunto do evento do objeto Document não inclui o evento CellChanged. Para afundar o evento CellChanged a partir de um objeto Documento (e o objeto ThisDocument num projeto VBA), tem de utilizar o método AddAdvise .

Exemplo

Este módulo do VBA mostra como usar o evento CellChanged para capturar alterações nas células de uma forma.

 
Private WithEvents vsoApplication As Visio.Application 
 
Public Sub CellChanged_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 'Set a module-level variable to trap application-level events. 
 Set vsoApplication = Application 
 
 'Draw a shape. 
 Set vsoShape = ActivePage.DrawRectangle(1, 2, 2, 1) 
 
 'Change a cell (to trigger a CellChanged event). 
 vsoShape.Cells("Width").Formula = 5 
 
End Sub 
 
Private Sub vsoApplication_CellChanged(ByVal vsoCell As IVCell) 
 
 Debug.Print vsoCell.Shape.Name & " " & vsoCell.Name & " changed to =" & vsoCell.Formula 
 
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.