[发明专利]基于Excel中VBA模块计算空调管路加工工艺的方法有效
申请号: | 201811245949.2 | 申请日: | 2018-10-24 |
公开(公告)号: | CN109492276B | 公开(公告)日: | 2022-11-25 |
发明(设计)人: | 路聕 | 申请(专利权)人: | 陕西泰德汽车空调有限公司 |
主分类号: | G06F40/18 | 分类号: | G06F40/18;G06F8/20;G06F8/38 |
代理公司: | 西安弘理专利事务所 61214 | 代理人: | 涂秀清 |
地址: | 710200 陕西省西安市经*** | 国省代码: | 陕西;61 |
权利要求书: | 查看更多 | 说明书: | 查看更多 |
摘要: | |||
搜索关键词: | 基于 excel vba 模块 计算 空调 管路 加工 工艺 方法 | ||
本发明公开的基于Excel中VBA模块计算空调管路加工工艺的方法,具体计算包括如下过程:开发VBA模块;在Excel工作表中定义CATIA数据处理模块、数据格式转化模块和计算模块;在Excel中设计软件界面及各功能区域,设置操作控件;在Excel工作表的窗体中导入CATIA格式的坐标点数据,通过计算模块设置的公式和Excel自带的公式计算出各工艺参数的结果并且在UserForm界面的文本框中显示出计算结并导出CSV文件。本发明公开的方法解决了现有计算方法过程繁琐,需要人工大量的重复性工作导致工作效率低下的问题。
技术领域
本发明属于机械工程技术领域,涉及一种基于Excel中VBA模块计算空调管路加工工艺的方法。
背景技术
汽车空调管路是三维空间结构,包含折弯的空心铝管、管端密封结构(墩头、鼓包、涨口、缩口)、密封沟槽(与空调胶管压接)、压力开关、制冷剂充注阀、固定支架(与铝管焊接或铰接)等结构,管路走向根据整车发动机、中冷器、散热器、驾驶室等系统的布置而变化,铝管的参数:空间点、管径、壁厚、折弯半径、管端密封方式(利用塑性成型原理加工的墩头、鼓包、涨口、缩口等结构),胶管参数:长度、规格、适用的铝管规格。目前管路加工坐标点普遍采用手工将CATIA导出的坐标点手动粘贴到Excel表格中,利用预先设置的公式计算,然后手工导出CSV文件;工艺参数计算则是手工计算,通过查询各种工艺参数,用计算器计算加工所需的原材料长度,以及铝管加工时所需的长度参数,这种计算方法过程繁琐,存在大量重复性工作,使用非常不便,降低工作效率。
发明内容
本发明的目的是提供一种基于Excel中VBA模块计算空调管路加工工艺的方法,解决了现有计算方法过程繁琐,需要人工大量的重复性工作导致工作效率低下的问题。
本发明所采用的技术方案是,基于Excel中VBA模块计算空调管路加工工艺的方法,具体计算包括如下过程:
(1)开发VBA模块:在Excel自带的Visual Basic编辑器中,建立与MicrosoftExcel中数据调用的UserForm界面、ThisWorkbook模块和工作表模块,所述ThisWorkbook模块用于Excel宏文件启动时加载UserForm界面,所述工作表模块用于切换Excel中的工作表,所述UserForm界面设置为多页面,用于将UserForm界面分为工艺参数计算页面和工艺参数查询页面,所述工艺参数计算页面设置有命令按钮、文本框和列表框;
(2)在Excel工作表中定义CATIA数据处理模块、数据格式转化模块和计算模块,所述CATIA数据处理模块用于将CATIA软件输出的坐标点数据存储在Excel的工作表中,所述计算模块设置有空间点间距、空间直线角度、圆弧长度、管路中心线长度的计算公式,所述数据转化模块用于将数据计算模块计算的结果转换为输出CSV格式的文件;
(3)在Excel中设计软件界面及各功能区域,设置操作控件,包括所述UserForm界面的各功能区域及触发调用控件、用于所述CATIA数据处理模块导入坐标点数据的存储区域,用于所述计算模块的计算区域,以及用于输出计算结果CSV格式的数据存储区域;
(4)在Excel工作表的窗体中或者通过VBA模块的UserForm界面导入CATIA格式的坐标点数据,用户在所述UserForm界面上输入工艺参数,所述Excel工作表的计算模块根据输入的工艺参数通过计算模块设置的公式和Excel自带的公式计算出各工艺参数的结果并且在所述UserForm界面的文本框中显示出计算结果并通过所述UserForm界面的命令按钮导出CSV文件。
本发明的其他特点还在于,
ThisWorkbook模块用于在Excel宏文件关闭时,判断Excel中打开的工作簿的数量,如果工作簿数量为1,则直接退出不提示保存,否则只关闭当前工作簿。
该专利技术资料仅供研究查看技术是否侵权等信息,商用须获得专利权人授权。该专利全部权利属于陕西泰德汽车空调有限公司,未经陕西泰德汽车空调有限公司许可,擅自商用是侵权行为。如果您想购买此专利、获得商业授权和技术合作,请联系【客服】
本文链接:http://www.vipzhuanli.com/pat/books/201811245949.2/2.html,转载请声明来源钻瓜专利网。