按在Autocad中选择的顺序将文本提取到excel

Eloquintet · 发表于 2007-8-24 14:39:08

我在我的绘图中有很多阴影大小作为文本，我不必在excel中复制，所以我想知道是否有办法提取这些，并按照我选择的顺序保存它们？我希望我的电子表格有一列宽度和一列高度，因此如果数字可以像下图那样放置，那就太好了：
宽度高度
96 200
45 75
这可行吗？

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复

ronjonp · 发表于 2007-8-24 14:42:13

任何事情都是可行的。我可能会有这样的事。让我查一查。

Eloquintet · 发表于 2007-8-24 14:49:05

Dan，
这可能会对您有所帮助。
这是一个将文本从上到下导出到文本文件的方法：

copy

(defun c:textout (/ ss lst fn fno txt)
  (setq        ss (mapcar 'vlax-ename->vla-object
                   (vl-remove-if
                     'listp
                     (mapcar 'cadr
                             (ssnamex
                               (ssget '((0 . "TEXT")))
                             )
                     )
                   )
           )
  )
  (if ss
    (progn
      (setq
        lst (mapcar '(lambda (x)
                       (cons (vlax-get x 'InsertionPoint)
                             (vlax-get x 'TextString)
                       )
                     )
                    ss
            )
        lst (vl-sort lst
                     (function
                       (lambda (e1 e2)
                         (< (cadr (car e2)) (cadr (car e1)))
                       )
                     )
            )
        fn  (strcat (getvar 'dwgprefix)
                    (vl-filename-base (getvar 'dwgname))
                    "-text.txt"
            )
        fno (open fn "W")
      )
      (foreach txt lst
        (write-line (cdr txt) fno)
      )
      (close fno)
      (princ fn)
      (princ)
    )
  )
)

Eloquintet · 发表于 2007-8-24 14:50:35

我刚刚开始集思广益，我们可以更好地自动创建阴影时间表，因为它们变得越来越大。我最终想开发一些更详细的东西，但这是我现在迫切需要的。我们的时间表由我需要从图纸、房间名称/号码、阴影大小，也许还有电机编号中获取的三个主要项目组成。我尝试在autocad中使用标准数据提取工具，它提取数据，但它不保持任何顺序，因此实际上毫无用处。如果我可以以给定的顺序选择这些项目并自动生成图表，那将是惊人的。我本来想在另一篇文章中提到这一点，但我想你还是会看这里。谢谢

Fatty · 发表于 2007-8-24 16:50:25

ron:这很有趣，但我想我必须将数据提取在一起，否则会很混乱，尤其是对我目前的项目来说，不过还是谢谢你，我会把它放在工具箱里。

Eloquintet · 发表于 2007-8-24 17:26:36

如果您的文本看起来像表格文本
(而不是Acad表格),您可以尝试这种方法
只需选择所有需要导出的文本
通过窗口
创建一个Excel文件，然后
全部更改以适应
~'J'~

Fatty · 发表于 2007-8-27 11:01:46

胖子，我正在尝试，但我觉得我错过了什么。我通过窗口选择我的文本，它打开了excel，但没有文件。我创建了一个新文件，然后试图粘贴，但什么也没有得到。这是如何工作的？

Eloquintet · 发表于 2007-8-27 12:08:13

啊，抱歉
忘了说，创建Excel文件之前
~'J'~

Fatty · 发表于 2007-8-27 12:51:23

哇，这是相当病态的胖子，你忘了提到我的文件必须dat.xls才能正常工作，但我从错误消息中发现了这一点，但没什么大不了的。我看到它提取了所有内容，但并不完全按顺序排列。我认为我可以让宽度和高度匹配的唯一方法是为每个阴影选择宽度高度宽度高度，我宁愿这样做，而不是在事实之后对它们进行排序。调整它以这种方式而不是单个窗口工作有多难？我喜欢这个想法，谢谢

Eloquintet · 发表于 2007-8-27 15:20:33

对不起，对我来说不够清楚
你能在这里上传一些照片来看看吗
你在说什么？
~'J'~

按在Autocad中选择的顺序将文本提取到excel

发表回复

精选推荐