基于VBA的牵引计算用坡度坡长自动提取

为自动从CAD图纸中提取线路的坡度坡长数据,该文编写了VBA程序。首先人工输入起点站和终点站名称、坡度坡长和标高所在图层名称,通过程序读取设计坡度和设计标高所在图层的数据,将结果导出到Excel;然后在Excel中对数据进行排序,通过设计坡度的坐标分离环线数据,通过设计坡度和设计标高之间的距离分离上行线数据和下行线,最后通过设计标高得到坡度值的正负号。通过实例验证了程序的有效性和快速性。

基于Engineering Base VBA的线表路径信息自动填充

手动添加线表路径信息存在耗时费力、准确率不高等问题。为解决上述问题,基于VBA开发了线表路径信息自动填充程序。通过该程序将原理图中的连接器、端子排信息导出到Excel;然后手动添加路径信息,通过Excel VBA自动核对格式;最后通过该程序将路径信息导入到原理图中。实际应用表明,所开发的程序能够提高工作效率和准确性。