☰

将 DWG/DXF 转换为 CSV 或 Excel

tag-icon • tag-icon csv autocad dwg
将 DWG/DXF 转换为 CSV 或 Excel

我正在使用 ZWcad，我需要将数百个块的坐标放入 excel 表或 .CSV 文件中，以便将其导入 GPS 硬件。我知道 autocad 有很多工具，我甚至可以自己编写一个，但就 ZWcad 而言，我似乎没有选择。

但是 ZWcad 也可以保存为 DWG，并导出到所有其他熟悉的 cad 扩展。所以我想知道如果我只保存需要导出的块到某个文件，是否有工具/程序可以将其直接转换为 .CSV。

答案1

下面是一个简单的 AutoLISP 程序，演示如何提取用于选择块引用的 WCS 插入点坐标到逗号分隔的 CSV 文件中。

(defun c:blk2csv ( / e f i p s )
    (if (and (setq s (ssget '((0 . "INSERT"))))
             (setq f (getfiled "" "" "csv" 1))
             (setq f (open f "w"))
        )
        (progn
            (repeat (setq i (sslength s))
                (setq i (1- i)
                      e (ssname s i)
                      p (trans (cdr (assoc 10 (entget e))) e 0)
                )
                (write-line (apply 'strcat (mapcar 'strcat (mapcar 'rtos p) '("," "," ""))) f)
            )
            (close f)
        )
    )
    (princ)
)

相关内容