概要 - 選択セットを作成する(VBA/ActiveX)

名前の付いた選択セットを作成するには、Add メソッドを使用します。このメソッドに必要なパラメータは、選択セット名だけです。

同じ名前の選択セットが既に存在するときは、AutoCAD はエラー メッセージを返します。選択セットを必要としなくなったときに、選択セットを削除するのは、よいプログラムの習慣です。Delete メソッドは、選択セットを削除するために次のように使用します。

ThisDrawing.SelectionSets.Item("NewSelectionSet").Delete

空の選択セットを作成する

次の例は、新しい選択セットを作成します。

Sub Ch4_CreateSelectionSet()
  Dim selectionSet1 As AcadSelectionSet
  Set selectionSet1 = ThisDrawing.SelectionSets.Add("NewSelectionSet")
End Sub