Select Similar with an isolate objects

[rcb007]

My brain is not functioning... I am trying to select a few objects, then it would select all the similar objects and finally isolate those objects.

 

(defun c:test ()
(command "aecselectsimilar" (ssget) "" )
(command "_isolateobjects" "p" "")
(princ))

 

 

[mhupp]

No need for ssget just type ss to run command.

 

Sorry didn't see you wanted to isolate objects.  Select objects and similar objects will be isolated select nothing to unhide all hidden objects.

 

;;----------------------------------------------------------------------------;;
;; Select Similar Objects & isolate shortcut
(defun C:SSO ()
  (if (setq SS (ssget))
    (progn
      (command "_.Selectsimilar" SS "")
      (command "_.isolate") ;no need for "P" objects are already highlighted from previous command.
    )
    (command "_.unisolate")
  )
  (princ)
)

 

Edited December 20, 2021 by mhupp

[rcb007]

Thank you MHupp. Tha

;;----------------------------------------------------------------------------;;
;; Select Similar Objects & isolate shortcut
(defun C:SSO ()
  (if (setq SS (ssget))
    (progn
      (command "_.Selectsimilar" SS "")
      (command "_.isolateobjects") ;no need for "P" objects are already highlighted from previous command.
    )
    (command "_.unisolateobjects")
  )
  (princ)
)

t is what i was tryin to get to work.

Edited December 21, 2021 by rcb007