1028695446 发表于 2019-6-14 10:22:30

统计图块并列表;统计文字并列表

统计图块并列表;统计文字并列表

wolaixuexi 发表于 2019-11-13 10:11:11


谢谢分享 下载试试

wuwubaibai 发表于 2021-1-4 23:51:58

本帖最后由 wuwubaibai 于 2021-1-8 23:45 编辑

大大请可否帮忙修改一下~已解決

一(defun c:tjtk(/ en mpl ss n nn m xx pt0 mpl_new i strcat entname scaleget tishi str)
      (if *table-zg (princ)(setq *table-zg (* 10 (getvar "DIMSCALE"))));设置模式全局变量,初始默认值=1
   可否加入类似      (setq entname (entsel "\n请选择图框")
               (setq   tishi (strcat "请输入缩放比例,使用推荐比例请直接输入空格<" (* scale 10 (getvar "textsize")) ">:"))
               (setq scaleget (getreal   tishi))

二 去除"序号"另把"图块名称" "数量"合并为一个单行文字且数量后面+"个"
如M4攻牙_5个   为一个连贯单行文字而不需要表格
M5攻牙为下一行麻烦大大帮忙谢谢


xj6019 发表于 2019-11-20 22:07:53

很好只是提取了数值字串后不能按照大小顺序排序    这样的话就不便于做统计用了吧    还得手动排序，做好是自动按大小排序，并且能识别*a*b   *c   带字母的   比方说1后面是1a 然后是1b.......然后是2.........

he378980280 发表于 2019-8-19 15:57:08

谢谢分享 下载试试

ketxu 发表于 2019-8-25 16:36:51

Thank you for sharing and downloading

逍遥无声 发表于 2019-11-7 01:29:35

liuxiooang 发表于 2019-12-19 14:13:23

Thank you for sharing and downloading

Fqb0515 发表于 2019-12-23 20:59:24

下载试试啊！

Fqb0515 发表于 2020-1-13 09:20:55

好用！好用！

nochao 发表于 2020-1-29 01:18:19

感谢分享！
页: [1] 2 3 4 5 6
查看完整版本: 统计图块并列表;统计文字并列表