《块属性输出到excel》

yimiyangguang55

yimiyangguang55 发表于 2024-3-7 23:18
大师，请教您一个问题，我有一个将CAD里面通过xyz坐标将文字导出到excel， excel文字导出到CAD的程序，现在 ...

正是慕名来找到您的帖子，
群里一个大神加了一段函数后，可以导出导入了。但是格式不一样，后处理特别码放。现在想请教您，有没有其他函数将导出导入的文字的格式一样。
导入函数加了这个语言，就可以运行了。
(defun STRTOK (str del / pos)
  (if (setq pos (vl-string-search del str))
    (cons (substr str 1 pos)
          (STRTOK (substr str (+ pos 1 (strlen del))) del)
    )
    (list str)
  )
)

yimiyangguang55

xyp1964 发表于 2024-3-6 20:16
输出csv格式可能更通用：

(if (setq ss (ssget '((0 . "insert") (66 . 1))))

您好，可以在我上面的程序上，导出导入都带文字格式的语句吗，并且导入时是替换原来的文字。而不是在原来位置上导入新的文字。谢谢啦