基于AutoCAD VBA与Excel的桩位偏差竣工图绘制

翁 浩

江苏东日基础工程有限公司，江苏 镇江 212300

桩位偏差竣工图是桩基工程验收时必需的资料之一。绘制桩位偏差图时需在桩位上标明桩位实际测量偏差方向与偏差值，并且验收时往往需要准备多份资料，对于较大的工程，动辄数千根甚至上万根桩，利用传统手工方式对施工蓝图进行改绘不仅工作量极大、效率低，还容易出现错误和纰漏。随着计算机图形的自动化发展，桩位偏差图自动化绘制成为可能。文章利用VBA在AutoCAD与Excel中的通用性，结合Excel较强的计算能力和AutoCAD较强的绘图功能两方面的优势，阐述了桩位偏差图自动绘制的方法。工程人员首先对现场桩位实际偏差进行统计，收集数据编制桩位偏差表，然后利用VBA在AutoCAD中读取Excel中的数据，根据读取的数据自动生成桩位偏差图。该过程简单快速，提高了工程人员的工作效率。

1 编程语言与运行环境

VBA是基于ActiveX技术的面向对象的应用程序开发工具，Microsoft Office系列软件及AutoCAD等流行通用的应用软件都内置Visual Basic编辑器，其强大的功能为各软件的二次开发提供了一个良好的平台。AutoCAD自R14.01版开始加入了VBA，由于其编程语言和开发环境较之其他简单而熟悉，用户可以快速高效开发满足各自需求的程序。利用VBA对AutoCAD与Excel进行二次开发，可以显著提高绘图工作效率。该开发工具已经广泛应用于各行各业专业的制图工作，是很多设计院和高校研究的热点。

以AutoCAD 2021和Microsoft 365 Excel为例，打开AutoCAD中Visual Basic编辑器，依次点击“面板”“管理”“应用程序”“Visual Basic编辑器”打开Visual Basic编辑器菜单（见图1），在Visual Basic编辑器中写程序代码，完成后点击工具栏里的运行程序即可执行所编写的宏命令。……