求和符号后面的数字

LNS17

单元格中有带“+”或“-”号，求和“+“或”“-”号后面的数字，求公式，详情请看附件： 求公式.rar (1.64 KB, 下载次数: 28)

2018-6-15 18:05 上传

点击文件名下载附件

，请在公式中考虑没有“+”或“-”号的单元格的情况

cjc209

你的里面都是公式了

chen-jian

2013版的可以用formulatext

LNS17

03版的就没有办法了吗

问山8828680

LNS17 发表于 2018-6-15 18:23
03版的就没有办法了吗

纯公我也解决不了
但03版可以用技巧解决
查找＝ 替换成' 点选项栏  查找范围：公式
全部替换
这时再用公式 用技巧都容易了

LNS17

谢谢了，因为列中的单元格内有的有符号，有的没有，用眼睛找吧，只能这样了

一剑惊心

03版的话，做辅助列

hopeson2010

数组公式:

1. =SUM(--RIGHT(SUBSTITUTE(FORMULATEXT(F2:F4),"-",REPT(" ",15)),15))

复制代码

或者VBA:

1. Sub ek_sky()
   
2.    Dim arr As Variant
   
3.    Dim i As Integer
   
4.    t = 0
   
5.       arr = Range("F2:F4").FormulaLocal
   
6.       For i = 1 To UBound(arr)
   
7.          If arr(i, 1) Like "*-*" Then
   
8.               t = t + Split(arr(i, 1), "-")(1)
   
9.          End If
   
10.       Next i
    
11. MsgBox t
    
12. End Sub

复制代码

问山8828680

hopeson2010 发表于 2018-6-15 20:03
数组公式:

或者VBA:

学习了
真不知道还有FORMULATEXT(F2)函数

0星剑0

hopeson2010 发表于 2018-6-15 20:03
数组公式:

或者VBA:

刚学vba 请教一下为什么t=0不用设变量呢