Liên kết các chuỗi ký tự vào 1 cell (2 người xem)

[Brutal]

Nhờ mọi người giải quyết giúp mình vấn đề này với. Ở cột A mình có dữ liệu như sau:
A1: 1234
A2: 5454
A3: 56465
.....
An: 7861
Mọi người giúp mình liên kết chuỗi này vào B1=A1+A2+...+An
Mình đã sử dụng hàm Concatenate nhưng với với n số thì thao tác rất là mệt mỏi.
Thanks All!

 

[Po_Pikachu]

Bạn dùng code này và xem file để thấy ví dụ nha!

Function ghepchuoi(vung As Range, Optional kytu As String)
For Each cel In vung
temp = temp & cel & kytu
Next
ghepchuoi = Trim(Left(temp, Len(temp) - IIf(Right(temp, 1) = kytu, 1, 0)))
End Function

Thân.

 

[Leo_178]

Theo mình không cần dùng VBA cũng được mà, chỉ cần dùng Concatenate và một cột phụ là xong, bạn xem file đính kèm nhé.

 

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

Theo mình không cần dùng VBA cũng được mà, chỉ cần dùng Concatenate và một cột phụ là xong, bạn xem file đính kèm nhé.

Theo mình biết thì hàm Concatenate chỉ giới hạn chuổi chỉ là 30 cell với lại hàm này không tiện ích bằng code của bạn Po_Pikachu.
Cám ơn bạn Po_Pikachu