本发明涉及一种利用VBA模块在AutoCAD中进行钻孔轨迹图绘制的方法。目前,煤矿井下定向钻孔多以瓦斯抽放钻孔为主,钻孔的初始设计一般都结合煤矿采掘平面图或地层剖面图完成,而采掘平面图或地层剖面图一般都采用AutoCAD软件绘制,现场经常需要将钻孔的实测轨迹和实际轨迹进行对比分析。本发明首先利用Excel完成的钻孔轨迹参数处理,再通过VBA模块调用Excel的计算结果,完成初始参数和线型设置,在AutoCAD中自动完成钻孔轨迹图的绘制。本发明利用随钻测量得到的钻孔轨迹参数快速地在AutoCAD中完成钻孔实测轨迹图的绘制,能够将实测轨迹与设计轨迹的绘制在同一张图中,为分析钻孔轨迹的控制效果提供方便。