Cám ơn các anh chị ạ, em thấy diễn đàn mình nhiệt tình thật đó, nhưng cái file a gửi cho em , em copy cái hàm đó của anh vào file excel của em mà không đúng , vậy cho em hỏi là em phải làm thê nào ạ
Cái này là hàm tự tạo bằng VBA chứ không phải hàm của Excel nên bạn copy mỗi hàm là không được.
Vâng cám ơn anh ạ. mọi người trong diễn đàn giỏi thật đó
. Cám ơn thầy Siwtom, hàm này rất hay ạ, thầy đã tính toán tất cả những trường hợp có thể sảy ra và em đã thử thấy rất hiệu nghiệm,k bao giờ sai được nữa. Cám ơn thầy
Em mới tham gia diễn đàn em đang cần tính tổng các số tiền sau mỗi dấu hai chấm":" ,mong anh chị giúp em với ạ
Trong hình ảnh và file đính kèm em muốn cộng tất cả các số này với nhau bằng 1 hàm gì đó ạ Tổng của các số: 223.5+24+500.3+332.1+650.5
Function Cong(Vung As Range)
Dim tam, A, AA, B, BB, C, Item
tam = Vung.Value
For Each Item In tam
A = Split(Item, ChrW(10))
For Each AA In A
B = Split(AA, " ")
For Each BB In B
If IsNumeric(BB) Then
C = C + Evaluate(BB)
End If
Next
Next
Next
Cong = C
End FunctionFunction Cong(Vung As Range)
Dim A, AA, B, BB, C, Item
For Each Item In Vung
A = Split(Item, ChrW(10))
For Each AA In A
B = Split(AA, " ")
For Each BB In B
If IsNumeric(BB) Then
C = C + Evaluate(BB)
End If
Next
Next
Next
Cong = C
End Function
(vì nhiều cái đọc em còn chưa hiểu ).
