Microsoft Visio Viewer で開いているドキュメントのレイヤーが変更されたときに発生します。
構文
式。OnLayerChanged (LayerIndex, Visible, ColorOverride, Color, ColorTrans)
式Viewer オブジェクトを返す式。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| LayerIndex | 必須 | Long | 変更されたレイヤーのインデックス。 |
| Visible | 必須 | ブール型 (Boolean) | 変更されたレイヤーがユーザー インターフェイスに表示されるかどうかを示します。 |
| ColorOverride | 必須 | ブール型 (Boolean) | 変更されたレイヤーの図形の色をオーバーライドするかどうかを指定します。 |
| Color | 必須 | OLE_COLOR | 変更されたレイヤーの色。RGB 値で表されます。 |
| ColorTrans | 必須 | 倍精度浮動小数点型 (Double) | 変更されたレイヤーの透明度の割合。 |
注釈
レイヤーは、[ レイヤー プロパティ] ダイアログ ボックスで変更することも、 LayerColor、 LayerColorOverride、 LayerColorTrans、および LayerVisible プロパティを使用してプログラムで変更することもできます。
例
次のコードは、 OnLayerChanged イベントを使用して、変更されたレイヤーの新しい透明度の割合を即時ウィンドウに表示する方法を示しています。
Private Sub vsoViewer_OnLayerChanged(ByVal LayerIndex As Long, ByVal Visible As Boolean, ByVal ColorOverride As Boolean, ByVal Color As stdole.OLE_COLOR, ByVal ColorTrans As Double)
Debug.Print "The new transparency percentage is"; ColorTrans
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。