怎么将一张CAD图纸上所有标注尺寸全部提取到excel中 怎么将一张CAD图纸上所有标注尺寸全部提取到excel中
作者&投稿：哀雷 （若有异议请与网页底部的电邮联系）
cad中怎么批量提取标注数字到excel 中或者是有什么软件有这个功能~
第二、登录exwinner报价软件，启动CAD扒图工具。
第三、打开图纸，扒图明细，导出到excel。
3.1、打开图纸
3.2、拾取屏柜
（1）右键“拾取屏柜”，鼠标移动到图纸区域，光标变成一个红色十字架。
（2）按住鼠标左键，框选柜号，点击鼠标右键，柜号框选完成。
3.3、拾取明细
右键“拾取明细”、或鼠标光标变成一个白色十字架时，按住鼠标左键框选明细。
第四、导出excel或提交至exwinner
（1）excel：点击“excel”图标导出到excel。
（2）提交至exwinner：需打开exwinner报价工程并定位在分类sheet页。
'获取标注尺寸函数Function FixDimMeas(Dimension As AcadDimension) As Long Dim BlockCount As Long Dim bz As Long BlockCount = ThisDrawing.Blocks.Count '遍历块中的对象，取得标注尺寸 Dim EntityInBlock As AcadEntity For Each EntityInBlock In ThisDrawing.Blocks(BlockCount - 1) If EntityInBlock.ObjectName = "AcDbMText" Then bz = Dimension.Measurement FixDimMeas = bz '取得标注尺寸 Exit For End If NextEnd Function
1、首先打开一个有坐标数据的cad图纸。该图纸的原点是在左下角，把原点设置在左上角，然后以左上角为原点重新设置所有坐标。
2、点击左侧工具栏中的符号标志坐标检查。
3、在弹出的坐标检查窗口中点击设置坐标系。
4、然后在图形中点击左上角的位置来设置坐标系的原点；点击后输入新的坐标，输入0,0也就是原点。按回车键确定。
5、然后在返回的坐标检查中点击确定。
6、在绘图区域选择要以新的坐标系为基准的坐标。选择的时候可以用框选或点选等。选择好要修改的坐标后点击右键，在弹出的菜单中选择全部修改。
7、等待片刻即可修改完成。
把cad值复制粘贴到记事本上，然后再复制粘贴到excel。试试看看。
第一、安装辅助工具“ExWinner报价软件”(带“CAD扒图工具”)。第二、登录exwinner报价软件，启动CAD扒图工具。
第三、打开图纸，扒图明细，导出到excel。
3.1、打开图纸
3.2、拾取屏柜
（1）右键“拾取屏柜”，鼠标移动到图纸区域，光标变成一个红色十字架。
（2）按住鼠标左键，框选柜号，点击鼠标右键，柜号框选完成。
3.3、拾取明细
右键“拾取明细”、或鼠标光标变成一个白色十字架时，按住鼠标左键框选明细。
第四、导出excel或提交至exwinner
（1）excel：点击“excel”图标导出到excel。
（2）提交至exwinner：需打开exwinner报价工程并定位在分类sheet页。
'获取标注尺寸函数Function FixDimMeas(Dimension As AcadDimension) As Long Dim BlockCount As Long Dim bz As Long BlockCount = ThisDrawing.Blocks.Count '遍历块中的对象，取得标注尺寸 Dim EntityInBlock As AcadEntity For Each EntityInBlock In ThisDrawing.Blocks(BlockCount - 1) If EntityInBlock.ObjectName = "AcDbMText" Then bz = Dimension.Measurement FixDimMeas = bz '取得标注尺寸 Exit For End If NextEnd Function
