本广告位全面优惠招商！欢迎大家投放广告！广告投放联系方式

ＥＸＣＥＬ在电厂化学水质报表中的应用

1　概述
　　电厂化学主要任务是水汽质量监督,而化学水质报表是这一工作的具体体现,它直接反映出各项监督项目的综合指数,这就要求报表必须及时、准确。
       化学水质报表是将每天的运行记录和定期抽查数据通过计算,将计算结果填写在事先绘制好的表格中。辽宁发电厂的水、汽品质监督报表分旬报表(上旬、中旬)、月报表、季报表、年报表、局报表(在役机组、退役机组),由于我厂有15台机组,数据多、计算量大,每天的统计和上台账需约2～3ｈ,每天报表大约需5～6ｈ,而且在计算工作中还容易出现错误,这就要求报表必须具备一定的准确性。随着计算机技术的不断发展,化学水质报表微机化势在必行。

2　ＥＸＣＥＬ的特点
　　现在计算机软件很多,如Ｗｏｒｄ、Ｅｘｃｅｌ等,根据化学水质报表的特点,我选择了Ｅｘ ｃｅｌ来制定此表。
       早在1985年,ＭｉｃｒｏｓｏｆｔＥｘｃｅｌ一经问世就公认为世界上功能最强大、技术最先进、使用最方便的电子表格软件。Ｅｘｃｅｌ电子表格软件具有崭新的外观、可用性强。能进行数据管理、数据分析、图形图表处理编程性。
       Ｅｘｃｅｌ电子表格软件,其外观的菜单栏和工具栏基本同Ｗｏｒｄ一致,具有较多鼠标拖曳功能,使编辑更为方便。工作薄文件由多工作表组成(最多255个),工作薄窗口底部有一行页面标签,每一页都用一个标签来标记,用鼠标单击页面标签即可实现工作表之间的切换。Ｅｘｃｅｌ还具有较强的图表功能,编辑和定制图表的过程是只需拖曳鼠标就可以实现的,Ｅｘｃｅｌ的函数库很大,能进行较复杂的计算,尤其在统计报表上较为方便。Ｅｘｃｅｌ是一个包含了ＶｉｓｕａｌＢａｓｉｃＦｏｒＡｐｐｌｉｃａｔｉｏｎｓ(ＶＢＡ)的应用程序,后者是Ｍｉｃｒｏｓｏｆｔ新一代的交叉应用程序宏语言。由于配备有ＶＢＡ,因而Ｅｘｃｅｌ包含了一个新的对话框编译器,一个新的菜单编辑器和一个新的调试程序。使ＶＢＡ,构造基于Ｅｘｃｅｌ的宏驱动应用程序更容易。

3　用Ｅｘｃｅｌ制作化学水质报表的过程
　　长期以来,数据的统计报表都需要人工计算、填写,工作量大且烦琐。火力发电厂的水、汽品质监督报表,就是由人工计算、填报的。根据辽宁发电厂的水、汽品质监督报表的特点,应用Ｅｘｃｅｌ电子表格软件,编制了一套报表程序,可自动生成我厂所需的各种报表,减少了人工烦琐的劳动,达到了东北电业管理局要求的计算机报表。具体做法有以下几点:
3.1　格式化工作表
       Ｅｘｃｅｌ支持单元格的"丰富文本格式",可以对单元格内的单个字符或字符串进行格式化,方法类似于Ｗｉｎｄｏｗｓ的文字处理软件。化学水、汽监督的各种报表是根据运行记录数据计算填报的。而Ｅｘｃｅｌ恰恰具有一个工作薄有多工作表的特点,利用这一特点即可在一个工作薄文件中建立各种报表页和1～15号机组运行数据登记台帐页。而台帐页可以在建立完1号机组后进行工作表复制,生成2～15号机组台帐页,修改一下标签名即可,见图1。
3.2　计算公式的建立
       Ｅｘｃｅｌ具有强大的函数库,包括数学函数、工程函数、逻辑函数等,可进行某一工作表内单无格及单元格区域的计算,也可进行工作表之间相互引用(绝对引用、相对引用)计算,还可进行工作表之间的三维计算。充分利用这强大的计算功能,即可对所建立的工作薄文件中的工作表建立计算公式。
       ａ 　一般性计算:根据报表要求建立求和、平均数、取最大值、最小值等公式。
　　ｂ 　条件函数的应用:化学水报表报出的数据要求具有代表性,这样才能体现出最终所求合格率的准确性。例如:某台机组在一月当中运行时间少于15ｄ,则在月报表中这台机组各项指标不做为统计数据报出。这样就需要输入条件语句。
       例:=ＩＦ(ＣＯＵＮＴ(5号机组!Ｋ9∶Ｋ41)>=17,ＭＡＸ(5号机组!Ｋ43),″″)此语句的含义是如果在5号机组台帐Ｋ项数据大于等于15个,报表项取最大值,否则返回空白。见图2。
       ｃ 　数据选择技巧
       在计算月报表的汽水损失率时,需要用到锅炉的额定蒸发量,但每月的天数不同,机组运行台数也不同,怎样才能达到自动取值呢?假定某厂有两台机组举例如下:首先在除盐水工作表页的Ｈ45～Ｈ48输入单台机组28～31ｄ的额定蒸发量,在Ｊ45～Ｊ48输入两台机组28～31ｄ的额定蒸发量,再在Ｈ50和Ｊ50内分别输入下列两个公式:
       =ＩＦ(ＣＯＵＮＴ(Ｂ8∶Ｂ40))=31,Ｈ47,ＩＦ(ＣＯＵＮＴ(Ｂ8∶Ｂ40))=30,Ｈ46,ＩＦ(ＣＯＵＮＴ(Ｂ8∶40))=29,Ｈ45,Ｈ48)))
       =ＩＦ(ＣＯＵＮＴ(Ｄ8∶Ｄ40)=31,Ｊ47,ＩＦ(ＣＯＵＮＴ(Ｄ8∶Ｄ40)=30,Ｊ46,ＩＦ(ＣＯＵＮＴ(ＤＢ∶Ｄ40)=29,Ｊ45,Ｊ48)))
       再在Ｉ52单元格输入下列公式,则Ｉ52即可作为计算汽水损失率时选择的额定蒸发量。见图3。
       =ＩＦ(ＣＯＵＮＴ(月报表!Ｓ8,月报表!Ｔ8)=1,除盐水!Ｈ50,除盐水!Ｊ50)
       ｄ 　三维计算
       报表中有些项目是1～15号机组整个平均值,这就要求对1～15号机组各台帐页进行三维计算。计算排污率公式如下:见图4。
       例:=ＡＶＥＲＡＧＥ(1号机组!ＡＫ43,2号机!ＡＫ43,3号机组!ＡＫ43,4号机组!ＡＫ43,5号机组!ＡＫ43,6号机组!ＡＫ43,7号机组!ＡＫ438号机组!ＡＫ43,10号机组!ＡＫ43,9号机组!ＡＫ43,11号机组!ＡＫ43,12号机组!ＡＫ43,13号机组!ＡＫ43)
3.3　输入页的制作
       每天各机组运行数据都要输入工作表台帐,为了给数据输入人员创造方便,本人应用ＶｉｓｕａｌＢａｓｉｃ语言编制一输入页,所有数据在此页中输入,再执行拷贝粘贴到工作表台帐。程序如下:(右侧黑体文字是对程序的解释)
       Ｓｕｂｂｕｔｔｏｎ3Ｃｌｉｃｋ()
       ＤｉｍｘＡｓＩｎｔｅｇｅｒ
       声明变量Ｓｈｅｅｔｓ("输入页") Ｓｅｌｅｃｔ
       激活"输入页"
       Ｒａｎｇｅ("ｂ10") Ｓｅｌｅｃｔ
       选"Ｂ10"单元格
       ｘ=ＡｃｔｉｖｅＣｅｌｌ.Ｖａｌｕｅ
       给变量赋值
       Ｓｈｅｅｔｓ("输入页") Ｓｅｌｅｃｔ
       Ｒａｎｇｅ("ｂ7∶ｓ7) Ｓｅｌｅｃｔ
       Ｓｅｌｅｃｔｉｏｎ.Ｃｏｐｙ
       拷贝"Ｂ7∶Ｓ7"
       Ｓｈｅｅｔｓ("1号机组") Ｓｅｌｅｃｔ
       Ｒａｎｇｅ("ｂ7").Ｓｅｌｅｃｔ
       以"Ｂ7"为基准单元格
       ＡｃｔｉｖｅＣｅｌｌ.Ｏｆｆｓｅｔ(ｘ+1,0).
       ＡｃｔｉｖａｔｅＡｃｔｉｖｅＳｈｅｅｔ.Ｐａｓｔｅ
       粘贴
       Ｓｈｅｅｔｓ("输入页") Ｓｅｌｅｃｔ
       返回"输入页"
       ＥｎｄＳｕｂ
3.4　公式保护
       为防止数据录入人员在录入数据过程中误删单元格中的公式,Ｅｘｃｅｌ提供了工作表保护功能,利用此功能可将单元格中公式保护起来,加上密码,其他人是无法修改的。更进一步增加了报表的准确性。
3.5　文字说明的填写
       各级报表中都有"情况分析"一栏,如在Ｅｘｃｅｌ中直接输入文字说明,只能只占据某一单元格,不利于录入大段文字。幸好Ｅｘｃｅｌ提供了绘图功能,利用此功能中的文字框按钮可在报表区域中画出一块作为"情况分析"输入文字用。见图5。

4　微机报表的应用
　　制作好的工作表,直观明了。统计人员只须将每天各机组的运行数据输入到输入页上即可。满10天后,旬报表中的数据会自动生成,满一个月后,月报表自动生成。不再需要任何计算,即打印出所需报表。

5　结论
　　本报表程序刚投入运行之初,也出现一些问题,经过在使用过程中的不断修改,在近一年的使用中来看,基本稳定。特总结以下几点:
       ａ 　此报表简单易学,操作方便,即使是没有计算机基础的人也可在很短的时间内学会使用。基本达到了快速准确报出电厂化学水、汽监督各项指标。
       ｂ 　此报表形式上与以前台账、报表完全一样,给使用人员带来很大方便。
       ｃ 　微机报表快速准确,避免了以前的长时间计算,省时省力。
       ｄ 　即使报表中没有数据,同样可以快速输出。
       ｅ 　将报表存于磁盘中便于保存,方便查看。