咨询费计算EXCEL函数.docVIP

咨询费计算，按最新的鄂价工服规[2011]23号文湖北省建设工程造价咨询服务收费标准，可自行修改定义， 使用方法： 打开excel alt+F11，插入模块，粘贴下面代码 在表格区域输入=zxf（123456789.00,3.3） 其中123456789.00改为你需要输入的工程造价，单位为元 3.3对应改为相应的项目，参看鄂价工服规[2011]23号文湖北省建设工程造价咨询服务收费标准表格 对应函数中的参数 咨询项目 1 工程项目设计概算编制 2 工程项目设计概算审核 3.1 清单计价 工程量清单编制或审核 3.2 控制价（标底价）编制 （不含工程量清单编制） 3.3 控制价（标底价）、工程结算审核 （1）基本收费 3.4 （2）追加收费 4.1 定额计价 工程预算、标底编制 4.2 工程预算、结算、标底审核 （1）基本收费 4.3 （2）追加收费 5 施工阶段全过程工程造价控制 6 竣工决算编制或审核 7 工程造价纠纷案件鉴定 Public Function ZXF(a, b) As Double 区间 q1 = 5000000 q2 = q3 = q4 = 100000000 If b = 1 Then 费率 c1 = 2 / 1000 c2 = 1.7 / 1000 c3 = 1.3 / 1000 c4 = 0.5 / 1000 c5 = 0.2 / 1000 公式 If a = q1 Then ZXF = a * c1 End If If a q1 And a = q2 Then ZXF = q1 * c1 + (a - q1) * c2 End If If a q2 And a = q3 Then ZXF = q1 * c1 + q2 * c2 + (a - q1 - q2) * c3 End If If a q3 And a = q4 Then ZXF = q1 * c1 + q2 * c2 + q3 * c3 + (a - q1 - q2 - q3) * c4 End If If a q4 Then ZXF = q1 * c1 + q2 * c2 + q3 * c3 + q4 * c4 + (a - q1 - q2 - q3 - q4) * c5 End If End If If b = 2 Then 费率 c1 = 1 / 1000 c2 = 0.8 / 1000 c3 = 0.6 / 1000 c4 = 0.4 / 1000 c5 = 0.2 / 1000 公式 If a = q1 Then ZXF = a * c1 End If If a q1 And a = q2 Then ZXF = q1 * c1 + (a - q1) * c2 End If If a q2 And a = q3 Then ZXF = q1 * c1 + q2 * c2 + (a - q1 - q2) * c3 End If If a q3 And a = q4 Then ZXF = q1 * c1 + q2 * c2 + q3 * c3 + (a - q1 - q2 - q3) * c4 End If If a q4 Then ZXF = q1 * c1 + q2 * c2 + q3 * c3 + q4 * c4 + (a - q1 - q2 - q3 - q4) * c5 End If End If If b = 3.1 Then 费率 c1 = 4.5 / 1000 c2