・ ブロック図形（図形タイプ INSERT ）にネストされたオブジェクトにアクセスする

INSERT図形にネストされた図形オブジェクトにアクセスするには、ブロックテーブルを調べ、ネストされたオブジェクトのデータを取得します

(setq ed (entget en) )  
(setq bn (cdr (assoc 2 ed) ) ) ; ブロック名の取得  
(setq nest_en (tblobjname "BLOCK" bn) ) ; ブロックテーブルを調べて、一番目はブロックの定義です 
(setq nest_en (entnext nest_en) ) ; 次からネストされた図形名が現れます  
(while (nest_en)  
  (setq nest_ed (entget nest_en) ) ; ネストされた図形のエンティティーデータ  
  ・・・・・・  
  ・・・・・・  
  ・・・・・・  
  (setq nest_en (entnext nest_en) ) ; ネストされた次の図形名の取得  
  )