免费视频|新人指南|投诉删帖|广告合作|地信网APP下载

查看: 34855|回复: 239
收起左侧

[其他] excel—VBA自动计算回次及分层数据

    [复制链接]

48

主题

3万

铜板

104

好友

版主

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
4249
发表于 2013-8-13 20:30 | 显示全部楼层 |阅读模式
       鉴于本人编录钻孔以来处理的大量的数据,虽然excel里公式填充柄确实好用,但是很多时候尽在回次数据里好用,在回次分层、分层信息里还是需要手动输入公式计算,十分麻烦,故闲下来时以本人微薄的VBA编程水平做了个钻孔编录数据处理表格(其格式以本人所在项目的为参考),希望对进行钻孔编录的地质同胞有所帮助。
       鉴于水平有限,可能会有一些BUG存在,希望能在实际运用中加以修正,欢迎大家联系交流。另外,本人编了一个实测剖面记录表计算及DGSS一键入库表格,觉得有用的可以看看。http://bbs.3s001.com/thread-128413-1-1.html
游客,如果您要查看本帖隐藏内容请回复

      使用前请仔细阅读模板说明,按其中说明操作
1.png
2.png

评分

参与人数 2铜板 +55 收起 理由
kanke + 5 赞!
永颉同心 + 50 好资源一定要顶!加油!

查看全部评分

29

主题

4万

铜板

44

好友

钻石会员

Rank: 26Rank: 26Rank: 26Rank: 26Rank: 26Rank: 26Rank: 26

积分
5902
发表于 2013-8-14 01:15 | 显示全部楼层
下载学习一下,谢谢
该会员没有填写今日想说内容.
回复 支持 反对

使用道具 举报

0

主题

5350

铜板

15

好友

地信学员

Rank: 12Rank: 12Rank: 12

积分
1013
发表于 2013-8-14 07:37 | 显示全部楼层
学习一下,谢谢分享
该会员没有填写今日想说内容.
回复 支持 反对

使用道具 举报

21

主题

5万

铜板

61

好友

黄金会员

Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23

积分
4192
发表于 2013-8-14 07:41 | 显示全部楼层
看看,是否实用


该会员没有填写今日想说内容.
回复 支持 反对

使用道具 举报

2

主题

3万

铜板

18

好友

资深会员

Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18

积分
3684
QQ
发表于 2013-8-14 07:45 | 显示全部楼层
你好,谢谢提供.
回复 支持 反对

使用道具 举报

7711

主题

31万

铜板

892

好友

超级版主

地信网论坛贵宾

Rank: 17Rank: 17Rank: 17Rank: 17Rank: 17

积分
128745

宣传勋章优秀斑主灌水勋章活跃勋章贡献勋章童话节勋章

QQ
发表于 2013-8-14 08:02 | 显示全部楼层
谢谢楼主分享
该会员没有填写今日想说内容.
回复 支持 反对

使用道具 举报

11

主题

8063

铜板

26

好友

地信院士

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
2738
发表于 2013-8-14 08:03 | 显示全部楼层
精彩大家分享,谢谢!
该会员没有填写今日想说内容.
回复 支持 反对

使用道具 举报

437

主题

7万

铜板

767

好友

版主

看帖回帖

Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15

积分
17070

精华勋章宣传勋章爱心勋章组织勋章优秀斑主地信元老灌水勋章荣誉会员勋章活跃勋章官方团队地信专家组VIP勋章贡献勋章名人堂勋章成就学员勋章10周年纪念勋章

发表于 2013-8-14 08:16 | 显示全部楼层
技术活!!!
道德常常能弥补智慧的缺陷,智慧却永远填补不了道德的空白。
回复 支持 反对

使用道具 举报

7

主题

1万

铜板

6

好友

高级工程师

Rank: 9Rank: 9Rank: 9

积分
1106
QQ
发表于 2013-8-14 08:22 | 显示全部楼层
很好很给力的内容,谢谢分享!
回复 支持 反对

使用道具 举报

1

主题

4万

铜板

24

好友

黄金会员

Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23Rank: 23

积分
5026
发表于 2013-8-14 08:31 | 显示全部楼层
谢谢提供资料
轻轻的我来签到了,想带走一堆铜板...
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

在线客服
快速回复 返回顶部 返回列表