欢迎来到天天文库
浏览记录
ID:38075717
大小:41.00 KB
页数:6页
时间:2019-05-26
《咨询费计算EXCEL函数》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、咨询费计算,按最新的鄂价工服规[2011]23号文湖北省建设工程造价咨询服务收费标准,可自行修改定义,使用方法:打开excelalt+F11,插入模块,粘贴下面代码在表格区域输入=zxf(123456789.00,3.3)其中123456789.00改为你需要输入的工程造价,单位为元3.3对应改为相应的项目,参看鄂价工服规[2011]23号文湖北省建设工程造价咨询服务收费标准表格对应函数中的参数咨询项目1工程项目设计概算编制2工程项目设计概算审核3.1清单计价工程量清单编制或审核3.2"控制价(标底价)编
2、制(不含工程量清单编制)"3.3控制价(标底价)、工程结算审核(1)基本收费3.4(2)追加收费4.1定额计价工程预算、标底编制4.2工程预算、结算、标底审核(1)基本收费4.3(2)追加收费5施工阶段全过程工程造价控制6竣工决算编制或审核7工程造价纠纷案件鉴定PublicFunctionZXF(a,b)AsDouble'区间q1=5000000q2=30000000q3=60000000q4=100000000Ifb=1Then'费率c1=2/1000c2=1.7/1000c3=1.3/1000c4=0
3、.5/1000c5=0.2/1000'公式Ifa<=q1ThenZXF=a*c1EndIfIfa>q1Anda<=q2ThenZXF=q1*c1+(a-q1)*c2EndIfIfa>q2Anda<=q3ThenZXF=q1*c1+q2*c2+(a-q1-q2)*c3EndIfIfa>q3Anda<=q4ThenZXF=q1*c1+q2*c2+q3*c3+(a-q1-q2-q3)*c4EndIfIfa>q4ThenZXF=q1*c1+q2*c2+q3*c3+q4*c4+(a-q1-q2-q3-q4)*c5E
4、ndIfEndIfIfb=2Then'费率c1=1/1000c2=0.8/1000c3=0.6/1000c4=0.4/1000c5=0.2/1000'公式Ifa<=q1ThenZXF=a*c1EndIfIfa>q1Anda<=q2ThenZXF=q1*c1+(a-q1)*c2EndIfIfa>q2Anda<=q3ThenZXF=q1*c1+q2*c2+(a-q1-q2)*c3EndIfIfa>q3Anda<=q4ThenZXF=q1*c1+q2*c2+q3*c3+(a-q1-q2-q3)*c4EndIfI
5、fa>q4ThenZXF=q1*c1+q2*c2+q3*c3+q4*c4+(a-q1-q2-q3-q4)*c5EndIfEndIfIfb=3.1Then'费率c1=4.5/1000c2=3.5/1000c3=2.5/1000c4=1.2/1000c5=0.5/1000'公式Ifa<=q1ThenZXF=a*c1EndIfIfa>q1Anda<=q2ThenZXF=q1*c1+(a-q1)*c2EndIfIfa>q2Anda<=q3ThenZXF=q1*c1+q2*c2+(a-q1-q2)*c3EndIfI
6、fa>q3Anda<=q4ThenZXF=q1*c1+q2*c2+q3*c3+(a-q1-q2-q3)*c4EndIfIfa>q4ThenZXF=q1*c1+q2*c2+q3*c3+q4*c4+(a-q1-q2-q3-q4)*c5EndIfEndIfIfb=3.2Then'费率c1=3.5/1000c2=2.3/1000c3=1.2/1000c4=0.8/1000c5=0.5/1000'公式Ifa<=q1ThenZXF=a*c1EndIfIfa>q1Anda<=q2ThenZXF=q1*c1+(a-q1)
7、*c2EndIfIfa>q2Anda<=q3ThenZXF=q1*c1+q2*c2+(a-q1-q2)*c3EndIfIfa>q3Anda<=q4ThenZXF=q1*c1+q2*c2+q3*c3+(a-q1-q2-q3)*c4EndIfIfa>q4ThenZXF=q1*c1+q2*c2+q3*c3+q4*c4+(a-q1-q2-q3-q4)*c5EndIfEndIfIfb=3.3Then'费率c1=5/1000c2=4/1000c3=1.5/1000c4=0.8/1000c5=0.3/1000'公式If
8、a<=q1ThenZXF=a*c1EndIfIfa>q1Anda<=q2ThenZXF=q1*c1+(a-q1)*c2EndIfIfa>q2Anda<=q3ThenZXF=q1*c1+q2*c2+(a-q1-q2)*c3EndIfIfa>q3Anda<=q4ThenZXF=q1*c1+q2*c2+q3*c3+(a-q1-q2-q3)*c4EndIfIfa>q4ThenZXF=q1*c1+q2*c2+q3*c3+q4*c4+(a
此文档下载收益归作者所有