如图有符号{}[]【】和文字的算式计算结果。
二、处理步骤
1、首先打开Microsoft Office Excel 2007,上例文件另存文件名《Excel怎样计算有符号和文字的算式.xlsm》(演示文件,下面代码复制到能运行宏的工作簿都可以)如图。
2、然后按下快捷键ALT+F11打开VBE(宏)编辑界面,然后点菜单栏【插入】下拉中列表中点【模块(M)】如图。
3、然后插入了一个模块1,在代码框中复制如下代码:Function TEXTJS1(ByVal m) Dim mm, TEXTJS2 On Error Resume Next mm = m.Text If Err.Number <> 0 Then mm = m Err.Clear End If With CreateObject("VBSCRIPT.REGEXP") .Pattern = "\【.+?\】" .Global = True TEXTJS1 = .Replace(m, "") End With With CreateObject("VBSCRIPT.REGEXP") .Pattern = "\[.+?\]" .Global = True mm = .Replace(TEXTJS1, "") End With With CreateObject("VBSCRIPT.REGEXP") .Pattern = "{" .Global = True TEXTJS2 = .Replace(mm, "") End With With CreateObject("VBSCRIPT.REGEXP") .Pattern = "}" .Global = True TEXTJS1 = Evaluate(.Replace(TEXTJS2, "")) End WithEnd Function
4、以上操作动态过程如下:
5、回到工作表窗口,输入放计算函数TEXTJS1,
语法规则: TEXTJS1(有文字算式单元格)
填写公式
=TEXTJS1(A3)
计算结果如下图。
6、如果觉得这篇文章帮到了您,请点击下方的 “点赞" 、“收藏”和“分享”支持我!还有疑问的话可以在“评论”中留言,谢谢啦!