Solidworks工程图转CAD图纸全攻略
Solidworks工程图转化成CAD的DWG格式图,而且转换的 DWG 在 AutoCAD 打开时不需更改,图层和颜色都可一丝不差。 一、Solidworks工程图转CAD图一般转换
1、打开需转换的Solidworks工程图,先查看和设置一下它的字体,打开菜单:工具 – 选项 – 文件属性 – 注解字体,右面列出的各注解的列表,如点击右面的―注释 – 零件序号‖,显示的是你图纸―注释‖和―零件序号‖的字体的设置。如图
2、把注释、零件序号、尺寸、细节、截面等全部设定好。
字体:―尺寸‖的字体应设置为英文字体,如― Times New Roman ‖、― Arial ‖等,其他一般为华文仿宋、仿宋、宋体、或黑体,我选的是―仿宋 _GB2312 ‖。(按国家制图标准,其实我最喜欢黑体,在图纸上显得很漂亮),选什么字体并不重要,重要的是你必须牢记字体的名字,一个字符都不能错,等一会要用。最简单的办法是用鼠标右键的―复制‖。(注意:字体用得越少越好,不然转换时易出错) 字体样式:常规
高度:可根据你的要求设置,最好按国家标准,各种幅面大小都有不同的字高要求。 3、在 SolidWorks 安装目录下的 data 目录中找到 drawfontmap.txt 文件,这就是转换的字体文件。打开它,在最后一行添加:你刚才复制的字体名 + 空格(随意) + 你刚才复制的字体名。―尺寸‖的字体因为选择的是英文字体,列表中已有了,不需加入。 4、保存 drawfontmap.txt 文件。
5、操作:文件 – 另存为,保存类型为 DWG 或 DXF 就 OK 了。
在 AutoCAD 中打开刚才转换的 DWG 的文件,应该转换的比较成功了,如果你觉得满意下面的《设置映射文件——图层、线型》和高级篇《一键搞定——VBA宏》你可以不必看了。 二、进阶设置映射文件 – 图层、线型
上面我们讨论了Solidworks工程图到 AutoCAD 图纸的一般转换,这样转换出来的图纸可以满足一般的要求,但它所有的物体都是在同一图层上的,如果需要在 AutoCAD 进一步编辑和打印比较麻烦。接下来,我们在把它设置的更完善些。
1、操作:文件 – 另存为,选择保存类型为 DWG 或 DXF ,点击选项,
2、 出现―输出选项‖对话框,选中―自定义映射Solidworks到dxf ‖。
3、再按―确定‖。系统返回到―另存为‖对话框;按―保存‖;出现Solidworks到dxf映射对话框。
4、对 AutoCAD 熟悉的朋友应该明白了,这就是设置转换成 DWG 文件的图层设置。点击添加,设置好图层的名称、颜色、和线条式样。
5、 点击―映射到实体,这是把你Solidworks工程图中的各种―实体‖应该放到 DWG 文件的哪各图层的设置,点击添加,把各实体分别放到第 4 步设定好的图层上去。有很多,别弄昏了头。注意:最好不要在这里选颜色和线条样式,而应在第 4 步设定,它会自动把颜色和线条样式设置为 BYLAYER 熟悉 AutoCAD 的朋友都清楚这一点。如果你不知道为什么,照做就可以了。
6、辛辛苦苦设置了这么多,可千万不能一确定了之,它可不会自动保存!选择―映射文件设定‖,找个目录,起个名字,按―确定‖保存起来。
7、点击―确定‖,完成。
打开转换的 DWG 文件,如果有什么不对的地方,回过头来修改设置,重新保存,直到满意为止。 三、高级一键搞定
两篇我们已讨论了转换问题,本篇涉及到具体的转换并不多,而是介绍Solidworks的另一个有用的工具——宏。其实,其他Solidworks的操作也可以如此简化的。
你是否觉得,每次转换的时候很繁,需东点西选,经常容易搞错另存为的格式,讨厌的映射文件每次出现,等待你更改?下面我们摆平它!
1、在Solidworks中操作:文件 – 另存为,选择保存类型为 DWG 或 DXF ,点击选项,出现―输出选项‖对话框,选择―每次保存时不显示映射‖,重新输出一遍。使映射设置对话框在输出的时候不再显示。
2、在Solidworks中操作:工具 – 宏操作 – 录制
3、把输出 DWG 文件的操作再来一遍。然后操作:工具 – 宏操作 – 停止,会出现宏的―另存为‖对话框。 4、取名保存宏。
5、操作:工具 – 宏操作 – 编辑,选择我们刚才保存的宏。
可以看见我们刚才执行的操作是把打开的工程图保存成一个aaa.DWG文件。
如果打开其他Solidworks工程图bbb,执行这个宏,结果会把这个图转换成 DWG 文件,但文件名仍然是aaa.dwg,这当然不行,我们来改进一下。
6、把全部代码删除,输入以下代码:(直接从网页拷贝、粘贴吧,保证不会错) Dim swApp As Object Dim Part As Object Dim Filename As String Dim No As Integer Dim Title As String Sub main()
Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc Filename = Part.GetPathName() No = Len(Filename)
Filename = Left(Filename, No – 7)
Part.SaveAs2 Filename & ―.DWG‖, 0, True, False Title = Part.GetTitle Set Part = Nothing swApp.CloseDoc Title
x = MsgBox(‖已保存为 DWG 文件 ―, 0) End Sub
7、解释一下代码的功能,熟悉 VB 的朋友可以跳过此部的分析,直接看下一段。