數字含數字括號內的數值加總

taller · 发表于 2023-3-5 10:56

准提部林 · 发表于 2023-3-5 12:24

本帖最后由准提部林于 2023-3-5 12:25 编辑

Function Sumbracket(Target As Range) As Double
For Each x In Target
For Each a In Split(Replace(x, ")", "("), "(")
xsum = xsum + Val(a)
Next
Next
Sumbracket = xsum
End Function

x7334103 · 发表于 2023-3-5 19:52

hcm19522 发表于 2023-3-5 10:28
B8=SUMPRODUCT((0&TRIM(MID(SUBSTITUTE(SUBSTITUTE(B1:B6,")",),"(",REPT(" ",9)),{1,10},9)))*1)

感謝但是怕被修改到還是用VBA的方式去處理，謝謝你讓我知道也可以用函數來滿足這個需求

x7334103 · 发表于 2023-3-5 19:53

taller 发表于 2023-3-5 10:56

萬分感謝，測試可用，真的非常謝謝

x7334103 · 发表于 2023-3-5 19:54

准提部林发表于 2023-3-5 12:24
Function Sumbracket(Target As Range) As Double
For Each x In Target
For Each a In Split(Replac ...

非常感謝你，最後採取了你的寫法，真的很謝謝你

		自动登录	找回密码
密码			免费注册

[求助] 數字含數字括號內的數值加總

评分