使用VBA编程制作MapGIS格式地球化学直方图的方法研究.PDFVIP

第３３卷第７期　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 山东国土资源　 　 　 　 　 　 　 　 　 　 　 　 　 　 ２０１７年７月 使用ＶＢＡ编程制作 ＭａｐＧＩＳ格式 地球化学直方图的方法研究 １ ２ 王增辉 ，伊飞 （１．山东省地质调查院，山东济南　 ２５００１４；２．山东省矿业权储备交易中心，山东济南　 ２５００１４） 摘要：Ｅｘｃｅｌ和ＭａｐＧＩＳ是地球化学数据处理和制图的常用软件，根据数据表手工计算和制作ＭａｐＧＩＳ格式图件的过 程通常比较繁琐，而ＭａｐＧＩＳ明码格式为数据表和图件的直接交互提供了可能。 使用ＶＢＡ 编程可以迅速、批量地 实现基于Ｅｘｃｅｌ数据表的地球化学专题图件的生成，该文以地球化学数据直方图的制作为例，在Ｅｘｃｅｌ 中通过ＶＢＡ 编程完成多元素地球化学数据直方图的制作。 该方法首先在Ｅｘｃｅｌ 中使用ＶＢＡ编程完成制图所需的关键统计值 和参数的计算，之后根据ＭａｐＧＩＳ明码格式的规则编程实现了点、线、区文件的批量生成，实现了数据表和图件的直 接交互，并且各种参数均可在代码层修改，代码完善后生成的图件可不进行任何后期人工修改，制图效率较高，制 图自由度高，操作简便。 ＶＢＡ编程制图具有灵活、易用和直观的优点，可以大幅减少数据处理和制图过程中的繁琐 操作，配合专业软件使用，在数据预处理、统计、分析等过程中均具有较高的应用价值。 关键词：地球化学；数据处理；Ｅｘｃｅｌ；ＶＢＡ；直方图；ＭａｐＧＩＳ明码 中图分类号：ＴＰ３０２．４　 　 　 　 文献标识码：Ｂ 引文格式：王增辉，伊飞．使用ＶＢＡ编程制作ＭａｐＧＩＳ格式地球化学直方图的方法研究［Ｊ］．山东国土资源，２０１７，３３ （７）：７７ ８１．ＷＡＮＧＺｅｎｇｈｕｉ，ＹＩ Ｆｅｉ ．Ｒｅｓｅａｒｃｈ ｏｎ ｔｈｅ Ｍｅｔｈｏｄ ｏｆ Ｍａｋｉｎｇ ＭａｐｇＧＩＳ Ｆｏｒｍａｔ Ｇｅｏｃｈｅｍｉｃａｌ Ｈｉｓｔｏｇｒａｍ ｂｙ Ｕ⁃ ｓｉｎｇ ＶＢＡ Ｐｒｏｇｒａｍｍｉｎｇ［Ｊ］．Ｓｈａｎｄｏｎｇ Ｌａｎｄ ａｎｄ Ｒｅｓｏｕｒｃｅｓ，２０１７，３３（７）：７７ ８１． Ｍｉｃｒｏｓｏｆｔ Ｏｆｆｉｃｅ软件功能。 ＶＢＡ在地球化学数据处 ０　 引言 ［４］ 理中有着广泛的应用 ，以往研究中借助在 Ｅｘｃｅｌ ［５ ６］ 的ＶＢＡ编程可以实现多种处理功能 ，也可以实 数据处理和制图是地球化学工作的基础，目前 ［７ ８］ 现由数据表到图件的直接转化 ，对简化工作流 开展的大面积地球化学调查和局部大比例尺地球化 ［９ １１］ 程，提高工作效率大有帮助 。 ＭａｐＧＩＳ软件是地 学调查工作往往涉及大量样品和数据，数据处理和 质行业常用的图件制作软件，其提供的明码（ＡＳＣⅡ 制图工作如果完全由人工操作则工作量会非常庞 ［１２ １３］ 码）格式为数据和图件交互提供了可能 ，这里 大，因此，通常需要借助一些专业数据处理软件进