本程序是监测人网站站长开发,为了方便那些做资料分析中统计各测点特征值,减少人工操作的工作量!
这是一个vba程序,可以试用创建“宏”运行程序,具体格式按照例子.xls就可以了!将会重新生成一个表来存放特征值,希望大家有所帮助!
同时希望大家一如既往的支持监测人网站!关于在监测资料中很多小型程序的分享或者交流可以直接和站长联系,或者加入监测人官方QQ群进行交流。
具体运行方法如下: 在EXCEL里先新建一个宏文件,再用程序自带的VBA编程器打开这个宏,把站长的源程序粘贴上去,然后再运行这个宏。
下面是部分程序源码【完成程序请参看附件】:
'程序由wbsky6编写,仅使用于本实验室,请勿外传。
k = 2
Sheets(1).Select
Sheets.Add
Sheets(1).Name = "wbsky6"
Sheets("wbsky6").Cells(1, 1) = "测点"
Sheets("wbsky6").Cells(1, 2) = "最大值"
Sheets("wbsky6").Cells(1, 3) = "最大值对应日期"
Sheets("wbsky6").Cells(1, 4) = "最小值"
Sheets("wbsky6").Cells(1, 5) = "最小值对应日期"
Sheets("wbsky6").Cells(1, 6) = "变幅"
Sheets("wbsky6").Cells(1, 7) = "平均值"
'程序由wbsky6编写,仅使用于本实验室,请勿外传。
[ 此帖被wbsky6在2009-03-09 13:23重新编辑 ]