図形選択の効率アップ！選択セットを操作するAutoLISP関数6選｜ssgetが重要

複数の図形を手動で選択することは手間がかかったり、選択のミスが起きたりするので効率的ではありません。しかし、AutoCADを使うなら図形を選択する作業は避けて通れないため、自動化したいと思う方も多いはず。

はこ

私はAutoLISPを独学で習得し、業務に役立つプログラムの作成を5年以上続けています。数行の簡単なプログラムから1000行以上の複雑なものまで、さまざまなプログラムを作成してきました。

この記事では選択作業を自動化したい方に向けて、選択セットを操作するAutoLISP関数を解説します。ほしい図形だけを一瞬で選択できるようになるため、めんどくさい選択作業から解放されます。

図形の選択を自動化してAutoCADをスマートに使いこなしましょう。

選択セットとは選択図形のグループ

選択セットとは図面上で選択した図形を1つのグループにまとめたものです。複数の図形を操作するときに役立ちます。

たとえば、図面全体から円だけを選択したり、既存の選択セットから赤い図形だけを選び出して新しい選択セットを作成したりできるため、めんどくさい選択作業が楽になります。

選択セットを使いこなすことはAutoCADの効率化につながるので、使い方をしっかり覚えてください。

選択セットを操作するAutoLISP関数6選

ご紹介するAutoLISP関数は次の6つです。

はこ

関数名の先頭に付いている「ss」とは「selection set（選択セット）」の略です。

選択セットを作成するAutoLISP関数「ssget」

ssgetとは図面上で選択した図形から選択セットを作成するAutoLISP関数です。選択する範囲や図形の種類などを絞り込むことができるため、ほしい図形だけで選択セットを作成できます。

はこ

引数の詳細は以下の表をご覧ください。ちなみに、各引数は省略することもできます。

選択方法

座標1、座標2、座標リスト

フィルターリスト

図形の情報をまとめた特殊なリスト。該当する図形のみ選択セットに追加される。

はこ

フィルターリストの書き方は後述するssgetの使用例で解説します。

ssgetの使用例

ssgetは与える引数次第で選択する図形を自由に絞り込めます。使用例をご紹介するので参考にしてください。ただし、絞り込みの条件を設定するためには図形の定義データについて理解しておく必要があります。

線分だけを選択する

次のプログラムでは選択する図形を線分だけに絞り込めます。

(ssget (list (cons 0 "line")))

条件を追加して選択する図形をさらに絞り込むことも。画層が"0"であることを追加するとプログラムは次のようになります。

(ssget (list (cons 8 "0") (cons 0 "line")))

図面全体から円だけを選択する

図面全体から円だけ選択して選択セットを作成するときは、以下のようにプログラムを書いてください。

(ssget "X" (list (cons 0 "circle")))

"X"は選択範囲が図面全体であることを表す記号です。図面上にある図形を漏れなく選択できるメリットがあります。

選択範囲を指定する

選択範囲の対角2点を与えることで、図形の選択範囲を指定できます。下記のプログラムでは(0,0)と(10,10)を対角とする四角を、選択範囲として図形を交差選択します。

(ssget "C" (list 0 0) (list 10 10))

はこ

選択範囲を指定する場合、選択方法も指定しないと返り値はnilになるので注意してください。

また、座標を1つだけ与えた場合は、与えた座標を通る図形が選択されるので覚えておきましょう。

(ssget (list 0 0))

選択範囲を多角形にする

通常の選択範囲は四角形ですが、頂点座標のリストを引数として与えると選択範囲を多角形にできます。頂点座標は時計回り、反時計回りのどちらでもかまいませんが、必ず順番どおりに並べて書いてください。

(setq pt-list (list (list 10 10) (list 0 15) (list -10 10) (list -10 -10) (list 10 -10)))
(ssget “CP” pt-list)

論理演算と比較演算で選択する図形を絞り込む

選択する図形を絞り込む条件には、論理演算と比較演算が使えます。

論理演算

真の値（True：条件が成立）と偽の値（False：条件が成立しない）という2つの値による演算のこと。論理積（AND）や否定（NOT）など演算方法にはいくつか種類がある。
>>論理演算とは - ITを分かりやすく解説

比較演算

<や=などの演算子を使って、値の大小や同一性を比較する演算のこと。比較の結果は真の値（True：条件が成立）または偽の値（False：条件が成立しない）で返す。
>>比較演算子とは｜「分かりそう」で「分からない」でも「分かった」気になれるIT用語辞典

たとえば、論理演算を使って図面全体から線分以外を選択するプログラムは次のとおり。

(ssget ”X" (cons -4 ”<NOT”) (cons 0 “line”) (cons -4 “NOT>”))

否定を表す条件の間に線分の情報を入れることで、線分以外が選択されます。ちなみに、-4は論理演算や比較演算の演算子を指定するためのグループコードです。

論理演算の演算子はグループ演算子と呼ばれ、上記のように必ずペアで使います。グループ演算子の先頭には”<”、最後には”>”が付くので注意しましょう。複数のグループ演算子を組み合わせて、絞り込みの条件を追加することもできます。

以下のプログラムでは比較演算により、中心のX座標が2以上の円だけを図面全体から選択します。

(ssget “X” (list (cons 0 “circle”) (cons -4 “>=,*,*”) (cons 10 (list 2,0,0))))

アスタリスク（*）を書いているため、y座標とz座標は選択図形の絞り込みに影響しません。また、画層や線種など、比較する情報が文字列の場合には比較演算が使えないので注意してください。

はこ

画層や線種で絞り込みたいときは前述した論理演算を活用しましょう。

選択セットから図形名を取得するAutoLISP関数「ssname」

ssnameは選択セット内の図形から図形名を取得するAutoLISP関数です。要素番号と呼ばれる選択セットに追加された順番を指定することで、対象の図形名を取得できます。

ssnameの構文と引数、返り値は以下のとおり。指定した要素番号に該当する図形が見つかったら、その図形名を返します。見つからなかった場合はnilが返り値となります。

次のプログラムでは図面全体の図形から選択セットを作成し、その選択セット内の2番目の図形から図形名を取得します。

(setq ss (ssget "X"))
(ssname ss 1)

はこ

選択セット内の要素番号は0から始まるため、2番目の図形は1が要素番号となります。

選択セットに図形を追加するAutoLISP関数「ssadd」

ssaddとは既存の選択セットに図形を追加するAutoLISP関数のこと。追加しようとする図形が選択セットに含まれている場合、ssaddは無視されてエラーにはなりません。

ssaddの構文と引数、返り値は次のとおり。

以下のプログラムは作成した円を既存の選択セットに追加します。

(setq ss (ssget))
(command “circle” (list 0 0) “D” 5)
(ssadd (entlast) ss)

entlastは最後に作成した図形の図形名を取得できるAutoLISP関数です。作成した円の図形名を変数ssの選択セットに追加します。

選択セットから図形を取り除くAutoLISP関数「ssdel」

ssdelは既存の選択セットから図形を取り除くAutoLISP関数です。

はこ

選択セットから取り除かれるだけで、図形自体は削除されません。

ssdelの構文と引数、返り値は次のとおりです。

以下のプログラムは、最後に作成した図形を既存の選択セットから取り除きます。

(setq ss (ssget))
(ssdel (entlast) ss)

entlastで最後に作成した図形の図形名を取得しています。選択セット内に図形が含まれていない場合はnilを返します。

選択セット内の図形を数えるAutoLISP関数「sslength」

sslengthは選択セットに含まれる図形の数を取得するAutoLISP関数です。中身がない空の選択セットの場合は0を返します。空の選択セットはnilとは異なるので注意してください。

はこ

空の選択セットは前述したssaddで作成できます。

sslengthの構文と引数、返り値は以下のようになります。

図面全体にある図形の数を知りたいときは次のようにプログラムを書いてください。

(setq ss (ssget “X”))
(sslength ss)

図形の数が3つの場合は整数の3を返します。図形が何もないときは0が返り値となります。

選択セットに含まれる図形か調べるAutoLISP関数「ssmemb」

ssmembとは対象の図形が選択セットに含まれているか調べるAutoLISP関数のこと。選択セットに含まれている場合は対象の図形名を返し、含まれていないときはnilを返します。

ssmembの構文と引数、返り値は以下のとおり。

次のプログラムは、最後に作成した図形が特定の範囲内に作成されたものか調べることができます。

(setq pt1 (list 5 5))
(setq pt2 (list 10 10))
(setq ss (ssget “W” pt1 pt2))
(ssmemb (entlast) ss)

(5,5)と(10,10)を対角とする範囲の窓選択によって、範囲内に含まれる図形だけで選択セットを作成します。その選択セットとentlastの返り値をssmembに与えることで、最後に作成した図形の図形名が選択セット内に含まれているか判定できます。

選択セットを使ってAutoCADを効率化しよう

今回ご紹介した選択セットを操作するAutoLISP関数を以下にまとめます。

選択セットを活用すると複数の図形をまとめて操作できるため、AutoCADの効率化につながります。さまざまな場面で使える便利なツールなので、使い方をしっかりマスターしてください。

>>【AutoLISPの教科書】AutoCAD自動化攻略読本のメリット5選｜おすすめ活用法も解説

【AutoLISPの教科書】AutoCAD自動化攻略読本のメリット5選｜おすすめ活用法も解説 AutoCADのめんどうな作業をやりたくない仕事が速くて正確なCADオペレーターになりたいAutoLISPを書籍で学びた…