11384288612一步一步教你自己编制EXCEL算量表格.docx
- 文档编号:5500268
- 上传时间:2022-12-17
- 格式:DOCX
- 页数:21
- 大小:287.67KB
11384288612一步一步教你自己编制EXCEL算量表格.docx
《11384288612一步一步教你自己编制EXCEL算量表格.docx》由会员分享,可在线阅读,更多相关《11384288612一步一步教你自己编制EXCEL算量表格.docx(21页珍藏版)》请在冰豆网上搜索。
11384288612一步一步教你自己编制EXCEL算量表格
非常漂亮的Excel算量模板
--语言描述、表格、图形一个都不能少
VeryniceExceltemplatesforconstructionbudget
--Descriptions、tablesanddrawingsareallindispensable
摘要:
工程手工算量计算繁琐,不易统计和修改,因而算量软件陆续出现。
然而算量软件操作必须严格按软件要求操作,对软件公司的指导依赖性很强;另外算量软件采用三维建模来实现计算的,较手工算量多出了繁琐的建模工作。
随着我国工程量清单规范的实施,编制自己的企业定额已日趋必要,企业定额的数据主要来源于历史数据的记录和统计分析。
Excel具有强大的数据处理能力,本人通过实际经验总结,制作了工程算量模板。
本模板在计算工程量及投标报价上具有以下优点:
数据清晰性强,
数据追溯性强,
调价直观性强。
当然模板在算量时智能化及精度无法与三维软件相比,追求清晰性、实用性、高效性的最佳组合。
关键词:
Excel应用,Excel-CAD表格互导、工程算量软件,工程量清单规范,企业定额。
Abstract:
Itistroublesometocalculatingbyhand,andit’snotconvenienttomakestatisticsormodify.Asaresult,calculatingsoftwareshaveappearedonebyone.However,wehavetofollowtheirinstructionsinordertousethesoftwares,andwedependalotontheguidanceofsoftwarecompanies;besides,whenusingsoftwarestocalculate,wehavetodoalotofmodelingwork,whichisthecoreoftheircalculatingsystem.
Asthespecificationforbillofquantitiescarriesout,itbecomesnecessarytomaketheenterpriseration,thedataofwhichcomefromtherecordsandstatisticsofhistoricaldata.Excelhaspowerfuldata-dealingability.Afteralotofpractice,Imakeatemplateforconstructionbudget.Ithasthefollowingadvantagesonconstructionbudgetandtenderoffer:
Thedataisclear.
Itcaneasilytellthesources.
Itiseasytoreadforadjustingprices.
Thoughthetemplatecannotbeatthesoftwareonintelligenceandprecision,Iamseekingforaperfectcombinationofclearness、practicabilityandefficiency.
Key:
ApplicationofExcel,data-inanddata-outbetweentablesofExcelandCAD,softwareforconstructionbudget,specificationforbillofquantities,theenterpriseration.
一、与传统手工算量及软件算量的比较
1、与传统手工算量的比较
传统手工算量的缺点
Excel模板算量的处理方案
烦
汇总统计烦
Excel数据处理,布局清晰
数据提取烦
相关设计参数查询烦
影响工程量的细部节点计算入公式模板,不影响投标报价的节点忽略
难
关联构件扣减难,支座判断难
按主次构件拆分建筑物,支座项目计入次构件
异型构件列式计算难
编辑公式模板,直接调用
变更错误准确调整难
Excel数据处理,布局清晰
核量对量难
2、与算量软件的比较
算量软件优点
算量软件缺点
Excel模板算量
三维建模形象直观
由于三维模型无法用于施工,二维图纸作为施工依据是必须的,也是完全可行的。
算量软件仅仅为了算量就使用三维建模并不值得。
在二维环境下就地解决,并配合打印图纸保持清晰性。
人为错误易于检查,不会出现大的计算错误
软件界面尚不成熟,操作者进对软件的迁就性较大
核心技术就2、3项,熟悉了就能操作,先进性主要表现在布局的科学合理性。
工程整体性差,图形、钢筋、安装分别计量,导出清单后才能套价
工程整体性好,从算量到出价一气合成。
对于软件合与分的说明:
话说世间万物,合久必分,分久必合,然而合者易分,分者却难合。
建立数学模型如下:
本模板A=K(X+Y+Z)=KX+KY+KZ
算量软件A=K1X+K2Y+K3Z=K1(X+K2/K1Y+K3/K1Z)
(A-工程量K-本模板K1、K2、K3算量软件图形、钢筋、安装等软件
虽然软件在K2/K1方面作了一些工作,即图形和钢筋文件互导,但使用范围有限。
二、核心途径
1、有限多维数据的清晰化处理
1)多级目录是多维数据的最基本方式,工程量清单就是采用得这种方式,将复杂的工程按清单项目目录综合成一体。
2)表格的行与列可组成矩阵,属二维数据,较目录形式的一维数据更加清晰。
3)数据的排序功能。
假设有一个三维数据(A,B,C),我们将A与B合并,数据更改为二维数据(A&B,C),但A&B本身仍是一维数据,现对A&B进行排序,顺序依次为(A1&B1,A1&B2,A2&B1,A2&B2),即目录化的二维数据。
2、工程量的公式合并
根据工程量清单规范,工程量的计量单位有件数、长度、面积、体积、重量,因此工程量计算公式并不多(不超过50个),我们需对不同的项目编辑公式,并将其合并为一个公式。
我们知道,使用IF公式,只可以对7个以下公式进行合并,且公式太过复杂不易检查。
这里我使用了宏自定义函数,操作如下:
工具—宏—vb编辑器—弹出vb编辑器窗口
依次点击菜单—插入—模块1,在窗口编辑如下内容:
Functiongcl(biaoji,L,B,H,n,d,one,two,three,four,five,six)
Ifbiaoji="构件"Then
gcl=0
ElseIfbiaoji="件数"Then
gcl=n
ElseIfbiaoji="长度"Then
gcl=L/1000*n
。
。
。
。
。
。
Else
gcl=""
EndIf
EndFunction
这里自定义的公式为gcl(),输入的参数包括L,B,H,n,d基本参数及one,two,three,four,five,six自定义参数,对于不同的biaoji,可定义不同的自定义参数。
因为不同的公式需要不同的参数,这里我使用语言描述(语言描述的应用)并使用Excel的公式识别语言并设置条件格式,提示需要输入哪些参数及自定义参数代表的名称,我们仍然通过自定义函数:
Functionsm(biaoji)
Ifbiaoji="构件"Then
sm="构件名称构件数量LBH"
ElseIfbiaoji="长度"Then
sm="Ln"
。
。
。
。
。
ElseIfbiaoji="上部筋"Then
sm="Lnd1柱宽2跨数(边跨输2倍,中间跨输100)"
。
。
。
。
。
Else
sm=""
EndIf
EndFunction
然后根据sm的内容进行条件格式的设置,需要输入的参数显示黄色,不需要的显示灰色,(一个构件的计算项目中有很多参数是一致的,为了避免多次输入,我们将公用参数作为构件参数,项目参数引用构件参数,显示蓝色,不一致时自行输入,显示黄色),效果如下图:
3、数据汇总
输入参数后,模板自动对项目进行编号,并自动在汇总表中引用该项目名称,并统计每个项目的工程量。
同时在横向对分类进行编号并引用,并对每个项目的工程量按分类进行拆分,(表格的应用)如下图:
三、亮点介绍
由于Excel和CAD在表格和图形方面功能非常强大,二者配合可以大大提高工作效率。
以下对其优势作说明如下:
1、流程简便,对量简单,只需核对输入数据是否与图纸一致及模板中30多个公式的正确性。
(流程图见下页)
2、参数输入快捷通道:
1)导入装修做法表,将其复制到Excel模板的相应位置,模板会自动计算装修做法,只需输入房间名称及尺寸、数量(对于矩形房间输入长宽高,异形房间输入面积、周长和净高)(图形的应用)。
2)导入门窗表,我们在导入的门窗表后添加三列(扣墙体、扣两面装饰),这样模板在计算门窗时会自动扣除门窗洞口的相应项目。
避免了在计算装饰面积时去重复计算扣除门窗的面积。
3)砼梁构件的参数根据平法标注统一输入,由模板进行计算自动填写参数。
减少了人为输入的错误。
3、借用CAD图统计总长度。
我们经常需要统计长度(比如计算室外水管的长度)。
然而CAD中并没有对直线长度的汇总功能,只能在文本文件中显示列表。
这样通过Excel强大的计算功能,就可以计算出总长度。
将结果复制回CAD图适中当位置,打印出附图作为算量资料的一部分(图形的应用)。
大部分构件已有模块,特殊构件自定义
配合CAD进行统计,打印图形进行备注
尽量按图纸格式输入参数,如梁平法标注
大部分公式已编辑好,遇有未编辑的公式,可自行输入,模板会以不同颜色区分自定义公式,或添加到自定义函数中
辅助工作,检查人为错误及钢筋指标
自动计算,按给定清单进行项目分类
模板中逐步添加初步价格
对占总价比重大的项目进行详细询价,保证总价的误差精度要求
计算主要指标,可参考类似工程的各项指标进行快速估价
4、指标输出功能,相似的工程具有相近的指标。
所以在算量后进行指标统计是非常必要的,一方面可以检查错误,二方面可以加深宏观认识、快速进行工程概算。
人材机图表,直观显示人材机总价,通过人工总价,可以估算出项目需要多少劳动力,进行技术标的设计。
以下两项指标图均自动自成,非常方便。
四、模板在企业定额定价与工程量清单衔接中的应用
1、挖土方:
工程量清单规范因为考虑不同投标单位的施工水平不一致,为了保持公平公正,规定土方工程量是按不放坡考虑的。
但实际施工过程中确实是要放坡的,企业成本也是与放坡土方量成正比的。
模板中是这样实现的:
先按留工作面,放坡进行计算工程量,并计价,记录总价。
对计算表格进行筛选挖土方,将工作面和放坡系数清除,得出不放坡工程量,填入清单。
2、不同构件的砼量:
工程量清单规范对梁、柱、板及墙等构件是分开计量的,但作为施工单位,在将工作分配给班组长时,一般并不会按不同类型使用不同的价格。
所以在模板算量时,对不同构件的同等级砼是统一定价的,以减少项目数量,加强数据清晰性。
3、化粪池等小型构件:
工程量清单规范为了简化清单,对小型构件进行了整合。
如果施工单位按构件进行定价,而图集中做法繁多,企业定额的计价项目将非常多。
在本模板中,我们对小型构件进行拆分至清单项目进行计价,计价后再将构件价格输入到工程量清单中。
4、门窗:
工程量清单规范为了将门窗五金综合到门窗综合价中,对门窗是按樘进行计量的,给施工单位的计价带来了很大的麻烦。
在本模板中,门窗作为项目按面积进行计价,门五金按数量计价,汇总成构件将其构件单价填入工程量清单中。
五、总结
本模板在算量时具有一定的智能性,较手工算量效率大大提高;而利用excel的强大数据处理功能和CAD的图形处理功能,实现了项目预算的高效性、整体性,对于宏观调整非常有效。
能满足投标报价的精度要求。
同时,本模板能较好地结合企业信息,配合企业定额的编制。
当然,本模板在项目计算的全面性、模板布局、操作技巧方面还有提高的空间,希望能为土建预算人员带来方便,并一起完善模板,共同提高。
QQ:
20439765QQ群:
56336868
Email:
yaker_77@
附:
VBA编程文件
自定义工程量计算的数组公式
OptionBase1
Functiongcl(biaoji,xm,L,B,H,n,d,one,two,three,four,five,six)
Ifxm="钢筋一级"Then
dengji="A"
ElseIfxm="钢筋二级"Then
dengji="B"
ElseIfxm="钢筋三级"Then
dengji="C"
Else
dengji="?
"
EndIf
Dimtemp(6)
SelectCasebiaoji
CaseIs="构件"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)=""
temp(5)=""
temp(6)=""
CaseIs="件数"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="n="&n
temp(5)=n
temp(6)="U"
CaseIs="长度"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="n="&n
temp(5)=L/1000*n
temp(6)="M"
CaseIs="面积"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="n="&n&"测S="&one&"加长="&two&"加宽="&three
Ifone=0Then
temp(5)=(L+two)/1000*(B+three)/1000*n
Else
temp(5)=one*n
EndIf
temp(6)="M2"
CaseIs="柱模板"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="n="&n&"测周长="&one
Ifone=0Then
temp(5)=(L+B)*2/1000*H/1000*n
Else
temp(5)=one/1000*H/1000*n
EndIf
temp(6)="M2"
CaseIs="梁模板"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="板厚="&one
temp(5)=L/1000*(B+2*(H-one))/1000
temp(6)="M2"
CaseIs="体积"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="n="&n&"测S="&one
Ifone=0Then
temp(5)=L/1000*B/1000*H/1000*n
Else
temp(5)=one*H/1000*n
EndIf
temp(6)="M3"
CaseIs="圆柱体积"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="n="&n&"D="&one&"t="&two
Iftwo=0Then
temp(5)=3.1416*one*one/4000*H/1000*n
Else
temp(5)=3.1416*(one*one-(one-two)*(one-two))/4000*H/1000*n
EndIf
temp(6)="M3"
CaseIs="梁砼"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="板厚="&one
temp(5)=L/1000*B/1000*(H-one)/1000
temp(6)="M3"
CaseIs="梯形"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="上宽="&one&"下宽="&two
temp(5)=L/1000*(one+two)/2000*H/1000
temp(6)="M3"
CaseIs="梯形放坡"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="工作面="&one&"坡度="&two
temp(5)=L/1000*(B+one*2+two*H)/1000*H/1000
temp(6)="M3"
CaseIs="锥形"
Sone=L/1000*B/1000
temp
(1)="S1="&Sone
Stwo=one/1000*two/1000
temp
(2)="S2="&Stwo
temp(3)=""
temp(4)="上长="&one&"下宽="&two
temp(5)=(Sone+Stwo+Sqr(Sone*Stwo))*H/3000
temp(6)="M3"
CaseIs="放坡锥形"
Sone=(L+one*2)/1000*(B+one*2)/1000
temp
(1)="S1="&Sone
Stwo=(L+one*2+two*H*2)/1000*(B+one*2+two*H*2)/1000
temp
(2)="S2="&Stwo
temp(3)=""
temp(4)="工作面="&one&"坡度="&two
temp(5)=(Sone+Stwo+Sqr(Sone*Stwo))*H/3000
temp(6)="M3"
CaseIs="面积锥形"
temp
(1)=""
temp
(2)=""
temp(3)=""
temp(4)="S1="&one&"S2="&two
temp(5)=(one+two+Sqr(one*two))*H/3000
temp(6)="M3"
CaseIs="柱钢筋"
gjn=n
temp
(1)=gjn
gjl=H+one+two
temp
(2)=gjl
Ifthree=0Then
djl=0
Else
djl=40*d*(three+1)
EndIf
temp(3)=djl
temp(4)=biaoji&n&dengji&d
temp(5)=gjn*(gjl+djl)/1000*Round(3.1416*d*d*7.85/4000,3)/1000
temp(6)="T"
CaseIs="柱箍筋"
temp(6)="T"
gjn=((H-five)/two+five/one)*n
temp
(1)=gjn
gjl=L*three+B*four
temp
(2)=gjl
djl=40*d*Int(gjl/9000)
temp(3)=djl
temp(4)=biaoji&n&dengji&d&"@"&one&"/"&two&"("&three&"*"&four&")"&"加密长"&five
temp(5)=gjn*(gjl+djl)/1000*Round(3.1416*d*d*7.85/4000,3)/1000
CaseIs="上部筋"
gjn=n
temp
(1)=gjn
Iftwo=100Then
gjl=L+one
Else
gjl=Int(L+one*(two+1)/two+15*d*2/two)
EndIf
temp
(2)=gjl
djl=Int(40*0.8*d*gjl/9000)
temp(3)=djl
temp(4)=biaoji&n&dengji&d
temp(5)=gjn*(gjl+djl)/1000*Round(3.1416*d*d*7.85/4000,3)/1000
temp(6)="T"
CaseIs="加强筋"
gjn=n
temp
(1)=gjn
Iftwo=100Then
gjl=L+one
Else
gjl=Int(L*2/3+one*(two+1)/two+15*d*2/two)
EndIf
temp
(2)=gjl
djl=Int(40*0.8*d*gjl/9000)
temp(3)=djl
temp(4)=biaoji&n&dengji&d
temp(5)=gjn*(gjl+djl)/1000*Round(3.1416*d*d*7.85/4000,3)/1000
temp(6)="T"
C
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 11384288612 一步一步 你自己 编制 EXCEL 表格