Không auto sum (tính tổng) được.

[zajng0an93]

Các anh kiểm tra giúp em file excel đính kèm với ạ, em bôi đen các dòng nhưng chỉ thấy đếm số dòng (count) mà không thấy tính tổng các dòng được ạ.
Và các anh chỉ giúp em cách sửa với.

Em cám ơn.

 

[Let'GâuGâu]

Các anh kiểm tra giúp em file excel đính kèm với ạ, em bôi đen các dòng nhưng chỉ thấy đếm số dòng (count) mà không thấy tính tổng các dòng được ạ.
Và các anh chỉ giúp em cách sửa với.

Em cám ơn.

nó hiểu dãy số của bạn là một chuổi?
bạn bỏ mấy cái chấm chấm đó đi, format lại là munber, dùng dấu phân cách hàng ngàn

 

[zajng0an93]

nó hiểu dãy số của bạn là một chuổi?
bạn bỏ mấy cái chấm chấm đó đi, format lại là munber, dùng dấu phân cách hàng ngàn

vâng cám ơn anh, nhưng file này là của bên em tải xuống từ hệ thống nên 1 file có rất nhiều chuỗi như thế này,
mình có cách nào để excel hiểu chuỗi này là số không ạ, vì nếu sửa thì bên em sẽ rất mất thời gian ạ.

 

[Let'GâuGâu]

vâng cám ơn anh, nhưng file này là của bên em tải xuống từ hệ thống nên 1 file có rất nhiều chuỗi như thế này,
mình có cách nào để excel hiểu chuỗi này là số không ạ, vì nếu sửa thì bên em sẽ rất mất thời gian ạ.

nhấn Ctrl H
trong cái ô find gõ dấu chấm vào, ô replace để trống, xong ok, nó sẻ thay hết toàn bộ dâu chấm
thích thì format cell lại

 

[phulien1902]

Các anh kiểm tra giúp em file excel đính kèm với ạ, em bôi đen các dòng nhưng chỉ thấy đếm số dòng (count) mà không thấy tính tổng các dòng được ạ.
Và các anh chỉ giúp em cách sửa với.

Em cám ơn.

Bạn thử:

Sub Sum_abc()
    Dim LR As Long, i As Long
    LR = Range("A1").End(xlDown).Row
    Columns(5).Value = Columns(1).Value
    Range("E1:E" & LR).Replace ".", "", xlPart, , , , False, False
    [C1] = WorksheetFunction.Sum(Range(Cells(1, 5), Cells(LR, 5)))
    Columns(5).ClearContents
End Sub