永发信息网

如何让excel的数据直接变成cad2007画直线所需坐标数据啊?

答案:6  悬赏:30  手机版
解决时间 2021-11-08 09:14
如何让excel的数据直接变成cad2007画直线所需坐标数据啊?
最佳答案
用VBA可以实现。
大致流程如下:
第一步:创建EXCEL应用后,打开指定的文件。
第二步:读取第一个点的起始位置。
第三步:根据读取的起始位置画直线。
第四步:将第二、三步重复执行,直到最后一条直线画完为止。
第五步:关闭EXCEL.
全部回答
EXCEL不可以和CAD直接连吧
未具体研究过,但两者都支持VBA的,技术上应该没问题
两种方法:
通过CAD VBA 可以实现,不过一两句话解释不清楚,我以前做过CAD与Excel交互的程序。
贴一段关键的代码给你,希望用的上。
Dim xls As Excel.Application
Dim bk As Workbook
Dim sheet1 As Worksheet
Set xls = CreateObject("Excel.Application")
xls.Visible = True
xls.Workbooks.Open (Application.Documents("翻译工具.dwg").Path & "\includ\图纸翻译.xls")

通过非VBA方式解决:
在C1中输入="line "&A1&" "&B1&" "
向下拖动使公式填充到所有需要的单元格,
新建一个TXT文件,把选中EXCEl中的C列,复制粘贴到TXT中,
将TXT改扩展名为.SCR文件,
在cad中输入命令:script 选取刚生成的.SCR文件运行即可。
在Excel中用字串运算,拼成(command "line" "x1,y1,z1" "x2,y2,z2" ""),所有这些列一次复制,粘贴到Autocad命令行中即可。注意学习Excel的&运算以及双"生成单"引号的内容。
例如在AB两列输入x,y坐标,在C列写公式 =A1&","&B1, 选中C列区域,复制一下.

然后打开cad中,输入line,在命令栏的提示后粘帖,回车即可.

子易空间站 - Excel培训专家
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
平菇西德89的品种特性。
求林依晨迪丽热巴在方特玩过山车的图片
众泰T800用的是什么发动机?
莲子可以和红豆薏米一起煮吗
500干牛等于多少吨
金杯v19发动机早晨打好几下才打着打着了有点
怀念妈妈的歌曲大全
3万的赌石,一刀切开,到做成手镯,利润到底
如果有一天我不在了,有谁会在半夜醒来,想我
天猫国际有日本的洗面奶,没有中文标识,说是
你好,请问这句话是什么意思? 用壬者,金妻
成都市个人社保实缴490.2元,划入个人账户196.
这种长成这样的是什么
1÷(-1)+0÷(-5.6)-(-4.2)×(-1)
跑400米的时候,总是听到人家说跑节奏,到底
推荐资讯
金丝楠木百年老料大板
为什么广东就成了中国最缺乏文化的省份?
钢结构防火涂料分为哪几类啊?
观察 巴焦树作文
新疆木垒县公安局交通警察大队车辆管理所办公
重庆丰都那有卖美赞臣
英语短we
听说用大蒜可以钓鱼真的么
怎样辨别硅藻泥的真假?爱美瑞硅藻泥真的有他
一万多块钱polo首富自动够吗
华创公司地址在什么地方,想过去办事
都匀市湖北利川怎么走
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?