Topic: Select a 3dface with entsel

[LogicTools]

Is there a way to select a 3dface with entsel?
Tested on any face of an extruded rectangle this code returns nil.

Code - Auto/Visual Lisp: [Select]

1. (defun c:select3dface ( / subobjselectionmode 3dface)
2.  (setq
3.   subobjselectionmode (getvar "subobjselectionmode")
4.   )
5.  (setvar "subobjselectionmode" 3) ; To select a face
6.  (setq
7.   3dface (car (entsel "\nSelect 3dface: "))
8.   )
9.  (setvar "subobjselectionmode" subobjselectionmode)
10.  3dface
11.  )
12.  

[LogicTools]

I tried different ways, but I guess it is not possible to select a face on a solid unless the solid somehow is decomposed into faces.

[GP]

Try changing the selection mode

Code: [Select]

(defun c:test ( / col p_sel)
    (setq col "1")
    (princ "\nSelect 3dface: ")
    (ssget "_+.:S:E:V" '((0 . "3dsolid")))
    (setq p_sel (cadr (grread T)))
    (command "_solidedit" "_F" "_L" p_sel "" col "" "")
)