Công thức cộng bỏ số 0

[doi_trai_co_don]

Các bạn giúp tôi cộng từ 1 cột sang 1 ô theo File gửi kèm. Hiện tôi đang dùng CT "Concatenate" để ra đáp án nhưng khi sang Sheet khác thì phải xóa bằng tay rất lâu. Bạn nào có công thức thì cho tôi xin nha, VBA cũng được.
Tất cả tôi giải thích trong File mong mọi người giúp đỡ. Thank

 

[SA_DQ]

Tạm VBA zậy nha:

Option Explicit [b]

Private Sub Worksheet_Change(ByVal Target As Range)[/b]
 Dim TongCot, Rng As Range
 Dim iJ As Long, iCol As Integer, lRow As Long
 
 iCol = Target.Column:      Set Rng = Range("A3:G123") [COLOR="Blue"] ' ![/COLOR] 
  If Not Intersect(Target, Rng) Is Nothing Then
    lRow = Cells(65432, iCol).End(xlUp).Row
    For iJ = 3 To lRow
        TongCot = TongCot + Cells(iJ, iCol)
    Next iJ
 End If
 Range("J" & (2 + iCol)) = TongCot [b]
End Sub[/b]

 

[chibi]

Tôi dùng sự kiện Worksheet_Change, bạn tham khảo trong file đính kèm

 

[anhtuan1066]

Oh.. ko phải bac SA ơi... ko phải là tính tổng mà là tạo ra chuổi tùy thuộc vào dử liệu có trong các cột A,B,C,D,E,F,G
Bác nhầm rồi... Nếu mà tính tổng thì quá dễ.. công thức cũng ra, cần gì đến VBA chứ
------------------------------------------
Uh... cái chibi làm là chính xác... hay hen!

 

[doi_trai_co_don]

Tôi làm được rồi theo cách của Chibi. Trúng fooc của tôi. Còn của SA_DQ cho ra tổng thì tôi chưa hỉu lắm. Thực ra là tôi cần chuỗi. Rất cảm ơn các bác dã giúp đỡ.
Còn bây giờ tôi có vấn đề khác (Có lẽ sai Topic) nhưng cứ Pít lên còn chuyển đi đâu thì do "chủ đầu tư" Hiiiiiiiii thong cảm nha, tiện thể thui.
Mạng nội bọ của Cty tôi dùng LAN. Vấn đề đặt ra là: nếu tôi có File (Excel) up lên ổ mạng để mọi người cùng xem (hoặc lấy dữ liệu). Có thể dùng công thức hay VBA để biết có bao nhiêu người (lần) đã mở File đó ra (nếu biết được những IP nào mở thì càng tốt. Cái này là ý tưởng của ngưòi khác nhưng thấy hay nên nhờ mọi người chỉ giùm. Học hỏi mừ

 

[SA_DQ]

Oh.. ko phải bac SA ơi... ko phải là tính tổng mà là tạo ra chuổi tùy thuộc vào dử liệu có trong các cột A,B,C,D,E,F,G
Bác nhầm rồi... Nếu mà tính tổng thì quá dễ.. công thức cũng ra, cần gì đến VBA chứ ------------------------------------------
Uh... cái chibi làm là chính xác... hay hen!

À ha,(!), Zậy xin lỗi nha! À mà chuỗi cũng có thể chuyển tẹo là được mà!

 

[anhtuan1066]

Đây nè... mới nghĩ ra cách dùng công thức, tuy hơi dài 1 chút, nhưng ít ra cũng chứng minh dc công thức vẫn có thể làm dc ấy chứ
He... he...
Các bạn có hứng thú thì cải tiến thêm giùm
ANH TUẤN

 

[anhtuan1066]

Cải tiến thêm 1 bước nữa... bỏ bớt cột phụ...