É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.