概要 - アクティブなオブジェクトをリセットする(VBA/ActiveX)

アクティブな画層や線種など、大部分のアクティブ オブジェクトへの変更はただちに表示されます。

ただし、リセットしないと変更が表示されないアクティブ オブジェクトもいくつかあります。これらのオブジェクトは、アクティブな文字スタイル、UCS、およびビューポートです。これらのオブジェクトが変更された場合、オブジェクトをリセットし、Regen メソッドを呼出して変更を表示する必要があります。

これらのオブジェクトをリセットするには、更新したオブジェクトに ActiveTextStyle、ActiveUCS、または ActiveViewport プロパティを設定します。

アクティブなビューポートをリセットする

以下の例では、アクティブなビューポートのグリッド表示を変更し、変更がアクティブなビューポートの表示に反映されるようビューポートをリセットします。

Sub Ch3_ResetActiveViewport()
  ' Toggle the setting of the grid display
  ' for the active viewport
  ThisDrawing.ActiveViewport.GridOn = Not (ThisDrawing.ActiveViewport.GridOn)

  ' Reset the active viewport
  ThisDrawing.ActiveViewport = ThisDrawing.ActiveViewport
End Sub