Événement Application.CellChanged (Visio)
Cet événement se produit après le changement de la valeur d'une cellule dans un document.
Syntaxe
expression. CellChanged (Cell)
expressionUne variable qui représente un objetApplication.
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Cell | Requis | [IVCELL] | Cellule dont la valeur a été modifiée. |
Remarques
Si vous utilisez Microsoft Visual Basic ou Visual Basic pour Applications (VBA), la syntaxe de cette rubrique décrit un moyen générique pour gérer efficacement les événements.
Si vous souhaitez créer vos propres objets Event , utilisez la méthode Add ou AddAdvise .
Pour créer un objet Event qui exécute un module complémentaire, utilisez la méthode Add applicable à la collection EventList.
Pour créer un objet Event qui reçoit des notifications, utilisez la méthode AddAdvise.
Pour rechercher le code de l’événement à créer, voir Codes d’événement.
Remarque
Utilisez les variables VBA WithEvents pour recevoir l’événement CellChanged .
Pour améliorer les performances, le jeu d'événements de l'objet Document n'inclut pas l'événement CellChanged. Pour recevoir l’événement CellChanged à partir d’un objet Document (et de l’objet ThisDocument dans un projet VBA), vous devez utiliser la méthode AddAdvise .
Exemple
Ce module VBA indique comment utiliser l'événement CellChanged pour détecter les modifications apportées aux cellules d'une forme.
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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.