雷武奎，程 富，刘 森

(黑龙江省水利水电勘测设计研究院，哈尔滨 150080)

Excel VBA在施工洪水调节计算中的应用

雷武奎，程 富，刘 森

(黑龙江省水利水电勘测设计研究院，哈尔滨 150080)

在水利工程施工期间，需要考虑在施工时利用导流建筑物进行施工洪水调洪演算，而施工洪水的调洪演算至今没有一个通用的程序。文章拟采用Excel VBA开发工具对施工洪水调节进行编程，以达到快捷、准确、高效地完成施工洪水调节计算的效果。

Excel VBA;施工洪水;调洪;演算

1 施工洪水调节演算的原理

施工洪水调节演算原理与水库调洪计算的原理一致，均是利用水量平衡方程进行调洪时段洪水调节计算。调洪演算的水量平衡方程式为:

2 施工洪水调节演算的重点、难点

施工调洪演算采用的方法主要是列表试算法和半图解法(双辅助线法和单辅助线法)，半图解法存在作图复杂、主观性强等缺点，列表试算法思路清晰、便于掌握等优势。过去采用手工进行列表试算，计算量极大，精度也不易控制，现在利用Excel VBA则可以快捷、方便计算，精度也大大提高了。

2.1 插值问题

施工调洪演算中将大量用到已知水位Z求库容V、已知水位Z求下泄流量q等计算，为了解决此问题，在此利用Excel VBA编写一个插值函数来实现。具体做法为:

1)打开工具—宏—宏

2)将下列代码添加到宏中

3)在表格中需要进行插值计算的部位调用chazhi(ary，x0)函数进行插值计算。

2.2 列表计算

施工调洪演算的第二大难点是进行列表试算。试算可以采用Excel中的单变量求解来完成，但每次只能计算一个时段的下泄流量q，使用起来相当麻烦，为解决此难题拟利用Excel VBA的录制宏进行修改以达到此目的。……