Documents.CellChanged イベント (Visio)
図面のセルの値が変更された後に発生します。
構文
式。CellChanged (セル)
式Documents オブジェクトを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
Cell | 必須 | [IVCELL] | 値が変更されたセルです。 |
注釈
Microsoft Visual Basic または Visual Basic for Applications (VBA) を使用している場合、このトピックの構文を使用して、イベントを一般的な方法で効率的に処理できます。
独自の Event オブジェクトを作成する場合は、Add メソッドまたは AddAdvise メソッドを使用します。
アドオンを実行する Event オブジェクトを作成するには、EventList コレクションに対して Add メソッドを使用します。
通知を受け取る Event オブジェクトを作成するには、AddAdvise メソッドを使用します。
作成するイベントのイベント コードについては、「イベント コード」を参照してください。
注:
CELLChanged イベントをシンクするには、VBA WithEvents 変数を使用します。
性能を上げるために、Document オブジェクトのイベント セットには CellChanged イベントが含まれません。 Document オブジェクト (および VBA プロジェクトの ThisDocument オブジェクト) から CellChanged イベントをシンクするには、AddAdvise メソッドを使用する必要があります。
例
この VBA モジュールでは、CellChanged イベントを使用して、図形のセルに対する変更をトラップする方法を示します。
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
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。