EXCELVBA结合CAD自动实现线路展点.pdfVIP

36 铁 道 勘 察 2015年第1期 文章编号:1672 7479(2015)01 0036 04 EXCEL-VBA 结合 CAD 自动实现线路展点 张仕林 (中铁大桥局集团第二工程有限公司,江苏南京 210015) Using the Combining of EXCEL-VBA and CAD to realize automatic points drawing ZHANG Shi-lin 摘 要 Excel VBA是寄生于运用广泛的微软软件Microsoft Office 中执行通用自动化程序的编程 语言,有强大的数据处理能力,集统计、计算等功能与一身,能够提供与其他软件交互的接口,具有友好 的交互功能。 介绍如何运用EXCEL 中的宏语言(即VBA)编写程序来计算线路坐标并自动在不同版本 的autoCAD软件中展绘点位。 该方法可以避免在CAD 中逐个绘制点位时可能的错误输入,亦可批量展 绘线路计算点,提高测绘工作的准确性和工作效率。 关键词 EXCEL VBA autoCAD 线路 自动 展点 中图分类号:P283.7 文献标识码:B 在公路、铁路、水运、管道等线路工程测绘工作中, 的excel2007及CAD2004及CAD2008 中验证通过。 往往需要将大量的线路点位数据通过各种方式进行计 1 基本思路与方法 算并在CAD 中展绘成形象且直观的平面图形,为后续 施工做好数据准备。 测量是一项系统、复杂,而又相对 对设计单位提供的原始线路设计数据进行核实与 单调、繁琐的工作,高强度的重复手工计算、输入数据 录入excel表格,并利用积木法计算出所需里程对应的 往往会造成错误,进而影响施工质量,甚至造成不可估 中桩点(中桩点计算完成后也可以不同边距边桩点的 量的损失。 需要一种精确、高效的数据计算和成图方 计算),然后在交互界面中根据用户选择新建或者利 法来避免因测量数据错误而造成的损失。 EXCEL是 用已有CAD 图形文件来实现展点绘图。 当前运用十分广泛的办公软件之一,不仅具有十分强 将新建工作簿的工作表Sheet1重命名为“平面数 大的表格函数,而且具有良好的二次开发功能。 CAD 据”,并在对应的单元格中录入设计单位提供的线路 亦是工程领域运用十分广泛的成图软件,使用CAD绘 设计参数,录入完成后的效果如表1所示。 制的平面图形具有形象直观的特点,方便查询与检核 表1 设计参数录入 各工程结构的相对位置关系。 交点(平面曲线)数据输入 本文所阐述的快速展点方法,是利用excel 电子表 前缓和 后缓和 交点 北坐标 东坐标 偏角(左- 半径 交点 曲线 曲线长 格与测量平面坐标(二维)相适应的特性,利用积木法 号 (X) (Y) 右+)/ (。) / m 长/ m / m 里程 计算线路的设计中(边)桩坐标,然后利用 excel VBA JD1 67003.6270 88590.8450 -12300 35 35 83.242 打开或新建CAD文件,并且根据