CellChanged イベント (Visio)Shape.CellChanged event (Visio)

図面のセルの値が変更された後に発生します。Occurs after the value changes in a cell in a document.

構文Syntax

CellChanged(セル)expression.CellChanged (Cell)

Shape オブジェクトを表す変数を取得します。expression A variable that represents a Shape object.

パラメーターParameters

名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
CellCell 必須Required [IVCELL][IVCELL] 値が変更されたセルです。The cell whose value has changed.

解説Remarks

Microsoft Visual Basic または Visual Basic for Applications (VBA) を使用している場合、このトピックの構文を使用して、イベントを一般的な方法で効率的に処理できます。If you are using Microsoft Visual Basic or Visual Basic for Applications (VBA), the syntax in this topic describes a common, efficient way to handle events.

独自のイベントオブジェクトを作成する場合は、 Add メソッドまたは**AddAdvise** メソッドを使用します。If you want to create your own Event objects, use the Add or AddAdvise method.

アドオンを実行する Event オブジェクトを作成するには、EventList コレクションに対して Add メソッドを使用します。To create an Event object that runs an add-on, use the Add method as it applies to the EventList collection.

通知を受け取る Event オブジェクトを作成するには、AddAdvise メソッドを使用します。To create an Event object that receives notification, use the AddAdvise method.

作成するイベントのイベント コードについては、「イベント コード」を参照してください。To find an event code for the event that you want to create, see Event codes.

注意

VBA のWithEvents変数を使用して、 CellChangedイベントをシンクすることができます。You can use VBA WithEvents variables to sink the CellChanged event.

パフォーマンスに関する考慮事項として、 DocumentオブジェクトのイベントセットにはCellChangedイベントは含まれません。For performance considerations, the Document object's event set does not include the CellChanged event. Documentオブジェクト (および VBA プロジェクトの**ThisDocument** オブジェクト) からCellChangedイベントをシンクするには、 AddAdviseメソッドを使用する必要があります。To sink the CellChanged event from a Document object (and the ThisDocument object in a VBA project), you must use the AddAdvise method.

Example

この VBA モジュールは、 CellChangedイベントを使用して、図形のセルに対する変更をトラップする方法を示しています。This VBA module shows how to use the CellChanged event to trap changes to a shape's cells.

 
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

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.