Excel Cách gộp nhiều Dòng có giá trị giống nhau / Merge Rows with Same Value Ngày đăng: 18/10/2023

Quả này thì nhiều anh em gặp, mình tìm đc trên mạng nên luộc về cho anh em tham khảo

Cái này thì sửa dụng CODE VBA trên Excel.

Các bạn cứ làm theo thôi, không cần hỏi :D

Ví dụ mình có bảng nội dung như thé này nhé

Excel Cách gộp nhiều Dòng có giá trị giống nhau Merge Rows with Same Value

Đầu tiên là các bạn cần sắp xếp lai Cột muốn gộp; Ở đây mình gộp cột B (Customer Name), nếu có giá trị giống nhau thì Merge nó lại.

Chọn dữ liệu B5:B14 để sắp xếp

Chọn Sort trên menu Data Tab.

Sau đó có 1 ô cảnh báo hiện lên; chọn Expand the selection and click on Sort.

Sau đó chọn Customer Name as the Sort by option.

Click on OK.

Giờ các bạn chọn Customer Name từ B5::B14 nhé; Vì nếu chọn cả cột nó chạy lâu lắm

Tiếp theo ấn tổ hợp phím: Alt+F11, cửa sổ Microsoft Visual Basics for Applications mở ra.

Chọn Module trên Menu the Insert tab.

Các bạn dán đonạ code này vào nhé:

Option Explicit
Sub MergeSameCells()
Application.DisplayAlerts = False
Dim rg As Range
MergeCells:
For Each rg In Selection
If rg.Value = rg.Offset(1, 0).Value And rg.Value <> "" Then
Range(rg, rg.Offset(1, 0)).Merge
GoTo MergeCells
End If
Next
End Sub

Sau đó ấn F5 để thực hiện chạy Code.

Chọn vào tên trên bảng và Run in the Macros window.

Xong rồi, quay lại excel và nhìn thôi