Có cách nào để merge thì ra số tổng

[cazonda]

Các bạn cho mình hỏi 1 chút, có cách nào khi mình Merge thì sẽ cho ra số tổng của 2 hoặc nhiều ô đó thay vì như mặc định là chỉ lấy được số liệu ở ô đầu tiên không ah?
Ví dụ: mình có các cell: a1 = 12, a2 = 10, a3 = 9,
Mình muốn sau khi merge 3 cell này thì sẽ được số: 31 thay vì 12 như hiện tại.
Cảm ơn các bạn

 

[Hai Lúa Miền Tây]

Các bạn cho mình hỏi 1 chút, có cách nào khi mình Merge thì sẽ cho ra số tổng của 2 hoặc nhiều ô đó thay vì như mặc định là chỉ lấy được số liệu ở ô đầu tiên không ah?
Ví dụ: mình có các cell: a1 = 12, a2 = 10, a3 = 9,
Mình muốn sau khi merge 3 cell này thì sẽ được số: 29 thay vì 12 như hiện tại.
Cảm ơn các bạn

Bạn dùng thử code sau nhé.

Sub Cong()
 Application.DisplayAlerts = False
    With Selection
        ActiveCell = Application.WorksheetFunction.Sum(Selection)
        .Merge
    End With
 Application.DisplayAlerts = True
End Sub

P/S: 12+10+9=31 chứ bạn

 

[cazonda]

Bạn dùng thử code sau nhé.

Sub Cong()
 Application.DisplayAlerts = False
    With Selection
        ActiveCell = Application.WorksheetFunction.Sum(Selection)
        .Merge
    End With
 Application.DisplayAlerts = True
End Sub

P/S: 12+10+9=31 chứ bạn

Cảm ơn bạn, mình đã dùng thử code của bạn nhưng kết quả vẫn không được. Nó vẫn báo "The selection contains multiple data values. Merging into one cell will keep the upper-left most data only" Nếu nhấn Ok thì dữ liệu vẫn không được cộng tổng và vẫn trở về 12.
Bạn xem lại giúp mình nhé

 

[Hai Lúa Miền Tây]

Cảm ơn bạn, mình đã dùng thử code của bạn nhưng kết quả vẫn không được. Nó vẫn báo "The selection contains multiple data values. Merging into one cell will keep the upper-left most data only" Nếu nhấn Ok thì dữ liệu vẫn không được cộng tổng và vẫn trở về 12.
Bạn xem lại giúp mình nhé

Tôi đoán là bạn không chạy code,
Tô khối vùng cần trộn, chạy code chứ không phải bấm vào chữ "a" để trộn nha.

Bạn xem file