Question

怎么快速从cad中提取文字到word

Answer 1

你好，下面是我复制的别人的文章，里面的“D9 CAD转换到word”应该是你要的插件。
不过直接复制不行吗
辅助插件下载
2017-01-03 CAD制图有问必答
每天积累一点，让自己更专业！
关注CAD制图有问必答

在公众号对话框直接回复下面的“代码”，免费获得精品资料！
注意是具体的代码，例如“D3”这样。
如果有链接失效请留言反馈！
CAD插件辅助工具类
D1 CAD文字拓展工具汉化包下载+一份ET工具说明【07-10】
D2 批量打印.VLX
D3 cadzbbz坐标标注插件
D4 cad窗口列表显示插件
D5 cad批量打印（虚拟打印输出）
D6 CAD版本之间转换器（打开高版本文件）
D7 CAD图案填充制作工具
D8 CAD转换EXCEL
D9 CAD转换到word
D10 lockdwg解锁嵌套无名块锁定的图纸
D11 PDF直接转换为DWG
D12 R2V（jpg转dwg软件）
D13 图层切换快捷键插件
D14 zidongbianhao自动编号插件
D15 电脑注册表清理软件
D16 去除 AutoCAD 教育版打印戳记
D17 三维螺纹制作程序
D18 燕秀工具箱
D19 CAD娱乐插件愤怒的小鸟
D20 CAD娱乐插件俄罗斯方块
持续更新...

Answer 2

http://jingyan.baidu.com/article/73c3ce28eb6d94e50243d97c.html
这个是CAD图形复制到WORD
如果是单单文字的话
在Cad中先进入文字编辑，选择需要的文字，复制后粘贴到Word中。注意，从CAD复制文字到word中，不能直接复制，这样复制的是图块，在Word中不能编辑。

Answer 3

Answer 4

绝对有用！！！感谢来自百度用户you_meworld的回答
以下是提取CAD的一个尝试，不过需要利用AUTOLISP。
1，首先养成好习惯，你要提取的文字应该在特定的几个图层。
2，菜单--工具--AutoLisp--Visual Lisp 编辑器，把下面代码复制进去：
(defun c:GTEXT()
(setq la (getstring "\n请输入图层名: "))
(setq ss (ssget "X" (list (cons 0 "TEXT") (cons 8 la))))
(setq fi (open "C:\\cir.txt" "w"))
(setq si 0)
(repeat (sslength ss)
(setq ct (cdr (assoc 1 (entget (ssname ss si)))))
(write-line ct fi)
(setq si (1+ si))
)
(close fi)
)
保存这个代码。记得存在哪里哟！！
这个代码会找到所有TEXT命令输入的文字，并导出到c盘 cir.txt.如果你需要MTEXT的文字，则要改变代码里面少许参数即可。
3，菜单--工具--AutoLisp--Load Application--选择你刚才存的Lisp文件.
4,在COMMAND命令行输入： gtext
5,到c盘根目录下找到cir.txt。
以上经ACAD 2014测试成功。
不容易呀！！