您现在的位置:233网校>一级造价工程师>技巧心得

用EXCEL自定义函数计算结果或得到值的计算表达式

来源:233网校 2008年11月24日

233网校小编为大家整理造价工程师考试报考,供大家参考使用。更多造价工程师考试报考信息,请关注233网校。也可加入233网校-造价工程师2群365916143,与全国的考生进行交流学习。

有许多朋友想知道计算表达式结果的方法,我自己做了一个,供大家参考,方法如下:
  打开excel,打开“工具_宏_visual basic编辑器”,在左侧的工程资源管理器中本文件名称上点击右键,选择“插入_模块”,在添加的模块的空白代码窗口中粘贴如下代码:
  function ych(jss, optional x) ’返回计算公式的值或值的计算公式
  dim s%, e%
  dim js as string
  if jss = "" then
  ych = ""
  else
  if ismissing(x) then ’返回计算公式的值
  if left(jss.value, 1) = "=" then
  jss = mid(jss, 2)
  end if
  do until instr(1, jss, "[") = 0
  s = instr(1, jss, "[")
  e = instr(1, jss, "]")
  jss = left(jss, s - 1) & mid(jss, e + 1)
  loop
  ych = evaluate("=" & jss)
  elseif x = 2 then ’返回值的计算公式或可计算的表达式或值本身
  if jss.hasformula = true then
  ych = mid(jss.formula, 2)
  else
  if isnumeric(evaluate(jss.value)) = true then
  ych = jss.value
  else
  js = jss.value
  do until instr(1, jss, "[") = 0
  s = instr(1, jss, "[")
  e = instr(1, jss, "]")
  jss = left(jss, s - 1) & mid(jss, e + 1)
  loop
  if isnumeric(jss) = true or isnumeric(evaluate(jss)) = true then
  ych = js
  end if
  end if
  end if
  end if
  end if
  end function
  (考试大造价)[nopage]

最后,造价工程师考前应根据自己的学习情况不断调整学习方法与心态,跟着老师的思路去“转”,老师课程中提到的重点知识点,一定要熟练掌握,多学多练多总结,学会举一反三。

造价工程师考试虽然难,但是也并不是攻不可破的,只要您有合理的学习方法,选择适合的课程,即使造价工程师考试难度再大,我们也能把它攻克!233网校教研团队倾心打造,为您定制适合的学习备考方案,讲师教学高效提分,让通过造价考试不再难。

相关阅读

۹ʦѧϰ

登录

新用户注册领取课程礼包

立即注册
扫一扫,立即下载
意见反馈 返回顶部