Cộng dồn sau dấu :

[AnhThu-1976]

Nhờ anh/ chị hướng dẫn cộng dồn như sau:
Cell A1 có giá trị Ao: 5+9+15
Em muốn cộng dồn sau :
Kết quả trả về là 29
Em cảm ơn!
P/s: trước đây đã từng thấy dạng này, nhưng nay cần thì tìm không ra

 

[Loc Uyen]

Nhờ anh/ chị hướng dẫn cộng dồn như sau:
Cell A1 có giá trị Ao: 5+9+15
Em muốn cộng dồn sau :
Kết quả trả về là 29
Em cảm ơn!
P/s: trước đây đã từng thấy dạng này, nhưng nay cần thì tìm không ra

Chị xem thử nhé!
https://www.giaiphapexcel.com/diendan/threads/hàm-tách-biểu-thức-số-và-tính-ra-kết-quả-hỏi-dùm-bạn.50469/

 

[snow25]

Nhờ anh/ chị hướng dẫn cộng dồn như sau:
Cell A1 có giá trị Ao: 5+9+15
Em muốn cộng dồn sau :
Kết quả trả về là 29
Em cảm ơn!
P/s: trước đây đã từng thấy dạng này, nhưng nay cần thì tìm không ra

Bạn dùng cái này thử xem.

Function tinhtong(ByVal chuoi As String, Optional ByVal phancach As String = "+") As Long
 Dim T, a As Double, i As Long
 Dim so As String
 so = Trim(Right(chuoi, (Len(chuoi) - InStr(chuoi, ":"))))
 T = Split(phancach & so, phancach)
 If UBound(T) = 1 Then
           a = 0
 Else
           For i = 1 To UBound(T)
              a = a + T(i)
           Next i
 End If
 tinhtong = a
End Function

 

[befaint]

tinhtong

Có hàm evaluate đó.

Function tinhtong(byval chuoi as string) as double
tinhtong=evaluate(split(chuoi,":")(1))
End function

 

[snow25]

Có hàm evaluate đó.

Function tinhtong(byval chuoi as string) as double
tinhtong=evaluate(split(chuoi,":")(1))
End function

Cảm ơn anh nhé.