office-excel计算公式

office-excel计算公式_第1张图片
实际效果

如上图所示,A列是一些计量单位的公式,如何实现合计自动得出前面公式的值呢?

技巧法:

  1. 添加辅助列。
  2. 批量替换掉文字。
  3. 在合计单元格引用辅助列。
  4. 将合计选择性粘贴为数值。
  5. 替换合计的等号。


    office-excel计算公式_第2张图片
    技巧方法演示

函数替换法:

思路与技巧法一样,采用函数替换掉多余的文字。再进行计算。

  • wps
    在B2单元格输入:

    =EVALUATE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"米",""),"个",""),"厘",""))
    

    然后往下拉。

  • Office Excel 2003

  • 定义名称:mm

  • 引用范围:

    =EVALUATE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"米",""),"个",""),"厘",""))
    

    然后在单元格B2输入:
    =mm
    即可得到正确的结果。

  • SUBSTITUTE的函数说明

  • EVALUATE的函数说明

VBA自定义函数法

在模块中放入代码:

Function mm(str$) As String
    With CreateObject("ScriptControl")  
        .Language = "JScript"       
        .Eval "function gets(str){return str.replace(/[一-龥]/g,'')}"     
        mm= Evaluate(.codeObject.gets(str))     
    End With    
End Function

然后在B2单元格输入:
=mm(A2)
往下拉即可。

office-excel计算公式_第3张图片
VBA使用演示

你可能感兴趣的:(office-excel计算公式)