如何让excel的数据直接变成cad2007画直线所需坐标数据啊?
答案:6 悬赏:30 手机版
解决时间 2021-11-08 09:14
- 提问者网友:雪舞兮
- 2021-11-08 00:03
如何让excel的数据直接变成cad2007画直线所需坐标数据啊?
最佳答案
- 五星知识达人网友:舊物识亽
- 2021-11-08 00:46
用VBA可以实现。
大致流程如下:
第一步:创建EXCEL应用后,打开指定的文件。
第二步:读取第一个点的起始位置。
第三步:根据读取的起始位置画直线。
第四步:将第二、三步重复执行,直到最后一条直线画完为止。
第五步:关闭EXCEL.
大致流程如下:
第一步:创建EXCEL应用后,打开指定的文件。
第二步:读取第一个点的起始位置。
第三步:根据读取的起始位置画直线。
第四步:将第二、三步重复执行,直到最后一条直线画完为止。
第五步:关闭EXCEL.
全部回答
- 1楼网友:雾月
- 2021-11-08 03:33
EXCEL不可以和CAD直接连吧
- 2楼网友:迟山
- 2021-11-08 03:18
未具体研究过,但两者都支持VBA的,技术上应该没问题
- 3楼网友:玩世
- 2021-11-08 02:20
两种方法:
通过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文件运行即可。
通过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文件运行即可。
- 4楼网友:等灯
- 2021-11-08 02:03
在Excel中用字串运算,拼成(command "line" "x1,y1,z1" "x2,y2,z2" ""),所有这些列一次复制,粘贴到Autocad命令行中即可。注意学习Excel的&运算以及双"生成单"引号的内容。
- 5楼网友:鱼忧
- 2021-11-08 00:56
例如在AB两列输入x,y坐标,在C列写公式 =A1&","&B1, 选中C列区域,复制一下.
然后打开cad中,输入line,在命令栏的提示后粘帖,回车即可.
子易空间站 - Excel培训专家
然后打开cad中,输入line,在命令栏的提示后粘帖,回车即可.
子易空间站 - Excel培训专家
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯