excel在混凝土管理与质量评定中的应用

1、邦EXCE唉L白在混凝土质量评定坝中的应用暗摘搬要版:佰随着中国的快速发安展伴,耙每年都有大量的基背础设施进行投资兴罢建。基础设施的建阿设离不开混凝土，啊尤其是大中型工程版项目所用混凝土数败量大、种类多，这背也给工程项目混凝哀土质量的统计评价白带来了一定的困难暗。要想解决困难让版工作变得轻松就需暗要一个好的工具。哎E癌xcel矮作为最常用的办公背软件之一，其功能胺是很强大的，特别笆是半VBA案（拜Visual B芭asic for败 Applica版tions俺是阿Visual B胺asic的一种宏语言瓣）傲对其岸功能拜扩展爱的哎支持霸，斑使翱Excel叭可以具有满足用户暗需求的个性化功能柏。

2、本文将结合工作芭实际，与读者共同翱分享一下如何利用颁E阿xcel澳的内置函数与般VBA坝对混凝土按强度佰的相关数据进行统胺计与质量评定分析啊。拌关键伴字:疤E霸xcel傲 百 背 盎自傲动百 半 皑混凝土评艾定氨 扳 敖强度1、概述罢当前在基础设施建按设过程熬中啊,柏混凝土被广泛应搬用巴,班尤其是大型的水利胺枢纽工碍程懊,哀所用混凝土种类拔多半,霸质量要求严鞍格胺,哎因此对所用混凝土袄质量的监控翱与评定吧就显得尤为重要。埃在施工现场，由于哀工程质量的需求，按必须要设立工地试半验室，对工程所用暗材料质量进行监控矮。混凝土的质量控澳制就是工地试验室芭日常背工作板的一项。隘一般颁工程所用混凝土拜有三

3、级配、二级配班、一级配稗，标号有俺C1案5鞍、把C2阿0跋、捌C2啊5胺、邦C3爸0扳、俺C40邦等艾，同一标号又分不摆同坍落度，因此采昂用啊E坝xce澳l啊建立混凝土台账，把并以台账作为混凝案土质量评定的数据拌源是提高工作质量奥与效率的有效手段跋。翱Exce败l碍作为一款优秀的办摆公软件，在日常工哎作中给人们带来了按极大的方便。拜本文将结合我扮在施工一线的工作爱经验奥,斑详细讲解一下摆Excel翱在混凝土质量管控矮中所发挥的作用。捌本工程采用水运工皑程系列规范、标准板指导施工，因此在俺以下的讲解过程中艾将采用水运疤标准中阿混凝土强度统计与颁评定佰的相关表格阿。班2吧、碍利版用艾Excel爱建

4、立混凝土取样及版强度统计台账板对于规模较大的工白程，混凝土用量大蔼，种类多，其质量鞍直接关系到工程质暗量的优略，因此对安于混凝土坝样品熬试验数据的统计评颁价扮就显得尤为重要。瓣为方便数据的管理拔，项目昂试验室采用扮Excel爸办公软件，建立混柏凝土台账对百其败进行管理。台账具拜体格式隘及布局板见蔼图挨1阿（之后的强度评定矮将以此为基础数据氨）坝。哀混凝土电子台账不懊仅可以方便试样的瓣管理，而且可以将埃其作为数据源建立挨混凝土样品的查找傲与强度评定的自动柏化表格。袄图挨1 碍 按混凝土取样台账3巴、把在半Exce摆l颁中建立混凝土质量俺评定表皑有了混凝土台账，把下面霸要建立混凝土质量吧评定的胺相

5、关斑表格艾。俺为方便制作，此处半将混凝土台账和混昂凝土质量评定版的半表颁格罢放在一个工作簿中阿（其板中搬sheet绊1拔、百sheet疤2半、啊sheet3摆工作表绊作为混凝土台账表办格，颁将混凝土强度评定捌表和混凝土强度统敖计表均放百在阿sheet4把工作表暗中敖）。拌本工程为水运工程办，适用水运的相关绊规范。此处将结合奥水运工程质量检测澳标准中混凝土强度唉评定所用表格来讲哀解碍Exce蔼l颁在混凝土强度评定熬中的应用。下面瓣来认识一下水运工颁程质量检测标准中捌混凝土强度评定所爱用的两个表格傲如图傲2白、搬图矮3盎。笆此外要想使表格具安有自动根据条件筛巴选和强熬度评定的功能，还半要在表格中设

6、定好半筛选条件，使表格绊能根据筛选条件芭筛选出符合要求的疤试样的相关数据，捌并将相关信息自动颁选填入白图疤2拌所示混凝土强度统斑计表胺。本表格所用筛选稗条件为混凝土标号耙（拜sheet4捌工作表安中邦的绊D埃4盎单元格）、试验日搬期范围（癌sheet4案工作表翱中般的拔C2般8袄、唉C2澳9爸两个单元格唉，盎C2蔼8稗为起点日期百，佰C2昂9吧为终点日期按）。瓣其次癌还把要在叭混凝土强度评定表叭的相翱关耙单元格中预隘填颁相关函数，使其具罢有根据邦混凝土强度统计表拌中耙已柏筛选出的数据进行挨自动计算的功能。百各单元格所用函数罢见鞍表版1背。盎在各函数版中鞍I暗f办函数出现频率较高熬。现对其作一简

7、要败说明哎，其他函数及用法背可参考相关数据盎。稗I搬f懊函数的基本结构为瓣：百=If办（判断条件，表达鞍式伴1坝，表达皑式按2袄）。它是根据判断跋条件结果的真假，爱来选择所需结果是俺表达跋式傲1阿还是表达霸式澳2佰。如果判断条件结扒果为真，则函数取绊表达版式爱1凹的结果，否则取表瓣达胺式癌2背的结果。其中表达百式笆1疤和表达拌式斑2巴还可以叭是阿I按f笆函数结果，这就形敖成了函数的嵌套，巴进而可以进行多重安判断（如混凝土强靶度评定表中案的吧B1氨0蔼单元格所用的嵌套疤结构挨的敖I芭f跋函数）。4、编写宏命令摆 背在完成以上工作后邦，还有最关键的一坝步，就是要编写一埃个宏命令（胺可以理解为跋用捌

8、VB袄A百写的一段程序碍，懊VB暗A坝是背VB皑编程语言鞍在凹offic耙e胺办公软件中的应用碍，其语法肮与把V盎B瓣相同）来完成根据耙条件搜索数据的任安务版。编写完宏之后，伴要将宏与控件（命般令按钮）进行关联佰，使单击控件坝可以完成搜索功能懊。伴图芭2 扳 哎混凝土强度统计表叭图唉3 胺 哀混凝土强度评定表对于控件靶的柏建立本文主要针对暗office靶201矮0绊版本进行讲解，其捌他版本过程相似。拔打开隘E坝xce癌l蔼后，板在巴“袄开发工跋具班”叭选项卡中单班击哎“叭控件斑”唉组中癌的皑“案插敖入坝”跋按钮，选绊择盎“佰表单控奥件疤”癌中俺的百“疤控斑件颁”霸选项，这时鼠标变版成十字形状，

9、按住背鼠标左键在般E背xcel扒当前工作表稗窗口拖拽即可，在搬之后弹出的窗口中扮把啊“碍宏班名霸”翱（即之后所要编写疤宏的名称）柏改成自己想要的名瓣字（本处改为绊“艾强度统瓣计搬”蔼）澳，在生成的控件按爱钮上单击鼠标右键芭选皑择靶“坝编辑文熬字胺”跋对控件进行命名，办至此控件已经做好案了。控件做好后，澳要为控件写一段程懊序使其具有功能。埃在控件上右键选扒择“唉指定俺宏氨”碍，在弹出的窗口中败单阿击矮“斑新扳建阿”爱进入程序编辑界面捌，在右侧宏编辑窗笆口案的拜中版写入相应代码即可翱。本强度统计所用扒宏芭代码暗如下懊（其中汉字鞍只作为解释捌，不作为程序的一瓣部分）绊：拜Sub案 哎强度统跋计翱(鞍

10、)肮Dim h As白 Date, j疤 As Date般, k As D矮ate板Dim d As叭 Integer碍, f As I袄nteger, 碍g As Int啊eger, p 斑As Integ柏er, c As耙 Integer把Dim s A阿s String版, y As S癌tring, z叭 As Stri鞍ng, x As熬 String颁j = Acti颁veWorkbo拌ok.Works扮heets(4)鞍.Range(c28).Va版lue俺 佰 翱 癌艾将日期范围端值赋艾给变量班k = Acti般veWorkbo翱ok.Works跋heets(4)肮.Rang

11、e(澳c29).Va白lue 背 艾 岸 隘 扒 拌 啊 翱f = 28 阿 拌 昂 哎 皑 懊 傲 稗肮数据统计表霸表肮2挨中第一统计行行号版为蔼29哎g = 15 摆 鞍 按 拔 芭 隘 艾吧数据统计表佰表罢2昂中第一列（强度列叭）序号胺为扳15哎For c = 挨1 To 3把 d = 2隘 矮 柏 拔 摆 傲 案 背 扒安混凝土台账中表头颁行行号 Do唉 d = d啊 + 1 s = A巴ctiveWor扳kbook.Wo耙rksheets耙(c).Cell办s(d, 4).瓣Value埃 耙 y = Act阿iveWorkb百ook.Work版sheets(4扮).Range(胺b4

12、).Va俺lue斑 z = M版id(s, 1,笆 1) 搬 凹 碍 佰 暗 袄 坝岸在混凝土标号中截绊取强度值把 I绊f z = C败 Then隘 z疤 = Mid(s昂, 2, 2)拔 E案lse: z =霸 Mid(s, 袄1, 2)俺 E癌nd If把 x = M哎id(y, 2,叭 2)氨 I巴f z = x 版Then 败 疤 皑 翱 靶 蔼把判断所选标号是否办符合筛选条件稗 h办 = Activ皑eWorkboo扳k.Worksh把eets(c).稗Cells(d,盎 6).Valu拜e 巴 白胺获取符合要求标号暗混凝土样试验日期矮 鞍 If h 伴 j And 袄h 4,IF(

13、F2040,5.5,4.5),-)根据试件组数确定统计时是否需要0参数,并进一步确定其数值F9IF(AND(D51,D55),IF(F2040,5.5,4.5),-)根据试件组数确定统计时是否需要D参数,并进一步确定其数值H9IF(AND(D54,D59,D519,1,-)根据试件组数确定统计时是否需要C参数,并进一步确定其数值B10IF(D54,mfcu-Sfcu=&K20&fcu,k=&F20&满足mfcu-Sfcufcu,k fcu,min=&H6&fcu,k-C0=&K21&满足fcu,minfcu,k-C0,IF(D51,fcu,k+D=&N20&mfcu=&H5&满足mfcufcu

14、,k+D& fcu,k-0.5D=&N21&fcu,min=&H6&满足fcu,minfcu,k-0.5D,仅有一个数值不做计算)利用If函数根据已计算出的数据做混凝土强度评定并将评定过程显示在B10单元格中，函数中F20、K20、K21、N20、N21单元格数值分别为fcu,k、mfcu-Sfcu、fcu,k-C0、fcu,k+D、fcu,k-0.5DB11IF(D54,IF(AND(H5-D6=F20,H6=F20-H9*C9),该批砼根据水运工程混凝土施工规范（JTS202-2011)标准评定合格,该批砼根据水运工程混凝土施工规范（JTS202-2011)标准评定不合格),IF(AND(D50,D5=F20+F9,H6=F20-0.5*F9),该批砼根据水运工程混凝土施工规范（JTS202-2011)标准评定合格,该批砼根据水运工程混凝土施工规范（JTS202-2011)标准评定不合格)利用If函数根据计算结果做出评定,并将结论显示在单元格B11中注：此表已将函数前的等号省略，图2表格中相关统计指标计算与表