Selection par effective name

[x_all]

Bonjour

dans la rubrique SSM de (Gile) existe il une routine pour faire une sélection de bloc dynamique à partir de leur effectivename?

merci

 

[(gile)]

Salut,

 

On ne peut pas utiliser le nom effectif dans un filtre de sélection, il faut faire un traitement post sélection

Voir un vieux sujet ici ou une réponse plus récente là.

[lecrabe]

Hello

 

Ci-apres une Routine en VLisp qui permet la selection des Blocs par leur Nom

et surtout avec le caractere magique ETOILE !

 

Cela te donnera eventuellement des idees !?

 

Bye, lecrabe "triste"

 

;; 
;; https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/select-blocks-by-wildcard/td-p/5923154
;;
;; Routine: SelBlocks by BeekeeCZ
;;
;; Select Block by the beginning of the Name ...
;; 

(vl-load-com)

(defun c:SelBlocks ( / bn ss i sn)
 (if (and (setq bn (getstring "Block Names to Select (For example: BL* -- Case Sensitive !) : "))
   (setq ss (ssget "_X" (list '(0 . "INSERT")
			      (cons 2 (strcat "`*U*," bn))))))
   (repeat (setq i (sslength ss))
     (if (not (wcmatch (vla-get-effectivename (vlax-ename->vla-object (setq sn (ssname ss (setq i (1- i)))))) bn))
(ssdel sn ss))))
 (if ss (sssetfirst nil ss))
 (princ)
)