请问怎么统计相同的门窗标注数量....

flytoday · 发表于 2011-12-5 18:26:13

本帖最后由 flytoday 于 2011-12-5 18:27 编辑

请问上图中像C2,TC0915,M0921等等相同的数字怎么一次性全选统计啊..
请大侠们出手教教谢谢啦

Andyhon · 发表于 2011-12-5 18:43:28

Ref:
http://www.google.com/search?q=s ... A%2F%2Fbbs.mjtd.com

flytoday · 发表于 2011-12-5 19:14:13

谢谢楼上找到了..

(DEFUN c:test (/ num1 ss1 text text_list tmp)
;;获取文字列表，格式([ ("文字内容" . 文字个数) ])
(SETQ ss1          (SSGET "x" '((0 . "*text")))
      num1          0
      text_list (LIST)
)
(REPEAT (IF       ss1
            (SSLENGTH ss1)
            0
         )
      (SETQ text (CDR (ASSOC '1 (ENTGET (SSNAME ss1 num1))))
            num1 (1+ num1)
      )
      (IF (SETQ tmp (ASSOC text text_list))
         (SETQ text_list (SUBST (CONS (CAR tmp) (1+ (CDR tmp))) tmp text_list))
         (SETQ text_list (CONS (CONS text 1) text_list))
      )
)
;;排序
(SETQ text_list (VL-SORT text_list '(LAMBDA (text1 text2) (> (CAR text1) (CAR text2)))))
(PRINt text_list)
(PRINC)

flytoday · 发表于 2011-12-5 19:14:52

本帖最后由 flytoday 于 2011-12-5 19:25 编辑

但是谁能帮我改改,能进行框选而不是全选谢谢
最好能生成EXL那样好看点哈

Andyhon · 发表于 2011-12-5 22:17:39

全选
(SSGET "x" '((0 . "*text")))
---------------------------------
框选
(SSGET '((0 . "*text")))

flytoday · 发表于 2011-12-5 22:52:59

本帖最后由 flytoday 于 2011-12-5 22:56 编辑

谢谢

flytoday · 发表于 2011-12-5 22:57:14

还想请问下没有炸开的话有办法做到吗

账号		自动登录	找回密码
密码			注册

请问怎么统计相同的门窗标注数量....

本帖子中包含更多资源

相关帖子