利用Excel VBA批量计算气象数据多个台站多年来春季和冬季降水量和平均气温

气象数据是地理数据的重要组成部分，存储量虽然不大，但是处理过程非常繁琐，长时序数据更不用说。本文总结了一个气象数据的基本处理方法。

如下图所示，气象数据的排列格式是区站号→年→月→降水量→平均气温，时间范围为1983~2012年，每一年都有台站数300多个，下面按区站号+年的格式来求降水量和平均气温

1、求春季降水量和气温

春季一般认为是当年的3,4,5月份，下面我们借助Excel VBA+ADO.NET，编写宏代码来实现：

Sub admin()Dim conn, xRs, SQL, xFd, yearyear = InputBox("请输入一个数", "输入")If year = "" ThenExit SubEnd IfIf year > 2012 Or year < 1983 ThenMsgBox "你想不想混了？", vbOKOnly, "哼"Exit SubEnd IfSet conn = CreateObject("ADODB.Connection")conn.Open "Provider=Microsoft.ACE.OLE

总结

以上是生活随笔为你收集整理的利用Excel VBA批量计算气象数据多个台站多年来春季和冬季降水量和平均气温的全部内容，希望文章能够帮你解决所遇到的问题。

如果觉得生活随笔网站内容还不错，欢迎将生活随笔推荐给好友。