Excel与CAD结合在地质制图工作中的应用.pdfVIP

地 质 学 刊 第35卷 第3期 Excel与 CAD结合在地质制图工作中的应用 薛卫冲 ， (1．南京大学地球科学与工程学院，江苏 南京 210093；2．江苏省有色金属华东地质勘查局，江苏 南京 210007) 摘要：采用CAD软件绘制地质图件时 ，常遇到不断重复简单的绘制命令 ，从而使得制图工作沉闷、低效 、多错。介 绍了利用 Excel的编制函数功能与 CAD命令窗 口相结合的原理 、方法及常用手段，通过实例来说明如何实现地质 制图过程的快速、准确与高效。 关键词：Excel；CAD；地质；制图 中图分类号：P283．7 文献标识码：A 文章编号：1674—3636(2011)03—0275—05 0 引 言 2 Excel编程与CAD命令的几种常见 “联姻”方式 CAD与Excel的信息互相导入，在工作中起到 意想不到的效果。可以开发 AutoCAD信息 自动导 2．1 平面坐标批量输入 入 Excel程序并在工程 中得到应用 (刘百来 等， 在 CAD中输人坐标的命令是用逗号分隔的2 2010)；CAD具有强大的制图功能，但涉及到用命令 个数值实现的，用Excel的Concatenate命令就很容 来制作表格及线就相当繁琐 ，如果能将 Excel的制 易实现这一链接 。 表功能应用到CAD中，将大大提高制作效率及效果 用 GPS记录测区内公路的 1883个坐标点的航 (李峰博等，2010)。 迹 ，需先将公路绘制到地质平面图上 。如表 1所示 ， 较多同行 已经对 CAD、Excel等软件结合运用 将输入多段线命令 (p1)、坐标值 (、y)采用 “concat— 作了探索，并运用到地质制图领域中，包括水文工作 enate()”命令编制函数(D列)。 (范长玉等，2010)、钻孔柱状 图绘制 (马江平等， 编制的Excel函数。 2005)等 。 IF(ISTEXT(A1)，CONCATENATE(”pl”，C2，”，”， Excel辅助 CAD，可利用数据共享制作勘查图 B2)，IF(A3=””，CONCATENATE (C2，”，”，B2，””)， 件，可实现真正意义上的计算机辅助设计 (孙淑贤 CONCATENATE(C2，”，”，B2)))，该函数返回的值为： 等 ，2007)。 pl428255，2807249……。这个值 CAD能识别并可 执行。 1 基本思路 将 D列复制并粘贴到 CAD命令行中就可绘制 GPS航迹 了。 Excel与CAD结合能够为工作提供便利，减少 执行过程解释 ：输人命令 pl一空格 (相当于回 重复劳动，提高准确率。其原理是让 Excel编制函 车)一输入坐标 (428255，3807249)～输入下一坐标 数 ，并将函数的计算结果显示成能让 CAD识别且可 (428245，2807269)……。 执行的命令。由于 Excel具有复制公式的功能，因 “IF”函数的作用是让第一个点号输入并执行 “ 此可以用Excel来做那些重复又简单的工作。