Tổng hợp dữ liệu các hàng trùng nhau trong bảng excel sang 1 bảng mới

haphambk74 · 6/5/22

Mình có 1 bảng dữ liệu có nhiều hàng trùng nhau muốn nhờ các bạn dùng vba tổng hợp giúp, xin cảm ơn nhiều ạ
file đính kèm GB3-1

BuiQuangThuan · 6/5/22

haphambk74 đã viết:
Mình có 1 bảng dữ liệu có nhiều hàng trùng nhau muốn nhờ các bạn dùng vba tổng hợp giúp, xin cảm ơn nhiều ạ
file đính kèm GB3-1

Dùng pivotable cho lẹ và tổng hợp được nhiều tiêu chí

Hoàng Tuấn 868 · 6/5/22

haphambk74 đã viết:
dùng vba tổng hợp

Bài này nên đăng tại chuyên mục lập trình chứ bạn.

haphambk74 · 6/5/22

BuiQuangThuan đã viết:
Dùng pivotable cho lẹ và tổng hợp được nhiều tiêu chí

mình thích kiểu như dùng consolidate trong excel có sẵn, nhưng cái đó chỉ được 2 cột trùng nhau. Pivot thì mình chưa dùng bao giờ, bạn gửi cho mình xem thử được ko, thanks

HDDP · 6/5/22

Bạn chọn remove duplicate là được nhé. Nếu như kết quả bạn muốn như bên dưới.

haphambk74 · 6/5/22

HDDP đã viết:
Bạn chọn remove duplicate là được nhé. Nếu như kết quả bạn muốn như bên dưới.View attachment 275471

oh, cái này cũng hay nhưng mình muốn chỗ grain là bằng tổng các hàng trùng nhau được không?

HDDP · 6/5/22

haphambk74 đã viết:
oh, cái này cũng hay nhưng mình muốn chỗ grain là bằng tổng các hàng trùng nhau được không?

Ý bạn là như thế này ah?

haphambk74 · 6/5/22

HDDP đã viết:
Ý bạn là như thế này ah?View attachment 275475

cutting-length	cutting-width	grain	material	Code N.1	Code N.2	Code N.3	label
2216	262	3	201				mat sau - GB3
2216	1200	3	201				mat sau - GB3
2216	818	3	201				mat truoc - GB3
2216	163	2	201				mat truoc - GB3
2216	179	2	201				mat truoc - GB3
1200	296	6	201				op ben - GB3
2216	382	2	619EV				276. mat ghe duoi - GB3
2216	155	2	619EV				276. mat ghe duoi - GB3
2248	554	3	619EV				mat ghe - GB3
2248	59	3	619EV				vien ghe - GB3
538	59	6	619EV				vien ghe - GB3

mình muốn tổng hợp kiểu ntn, cột grain bằng tổng các hàng trùng nhau

HDDP · 6/5/22

haphambk74 đã viết:
cutting-length cutting-width grain material Code N.1 Code N.2 Code N.3 label
2216
262
3
201 mat sau - GB3
2216
1200
3
201 mat sau - GB3
2216
818
3
201 mat truoc - GB3
2216
163
2
201 mat truoc - GB3
2216
179
2
201 mat truoc - GB3
1200
296
6
201 op ben - GB3
2216
382
2
619EV 276. mat ghe duoi - GB3
2216
155
2
619EV 276. mat ghe duoi - GB3
2248
554
3
619EV mat ghe - GB3
2248
59
3
619EV vien ghe - GB3
538
59
6
619EV vien ghe - GB3

mình muốn tổng hợp kiểu ntn, cột grain bằng tổng các hàng trùng nhau

bảng bạn với bảng mình giống nhau ấy, chẳng qua trong piivot table mình count cột grain bên phần value nên nó để sau cùng, còn dữ liệu vẫn vậy mà. Bạn pivot xong son sánh lại nhé.

Hai Lúa Miền Tây · 6/5/22

haphambk74 đã viết:
cutting-length cutting-width grain material Code N.1 Code N.2 Code N.3 label
2216
262
3
201 mat sau - GB3
2216
1200
3
201 mat sau - GB3
2216
818
3
201 mat truoc - GB3
2216
163
2
201 mat truoc - GB3
2216
179
2
201 mat truoc - GB3
1200
296
6
201 op ben - GB3
2216
382
2
619EV 276. mat ghe duoi - GB3
2216
155
2
619EV 276. mat ghe duoi - GB3
2248
554
3
619EV mat ghe - GB3
2248
59
3
619EV vien ghe - GB3
538
59
6
619EV vien ghe - GB3

mình muốn tổng hợp kiểu ntn, cột grain bằng tổng các hàng trùng nhau

Bạn thử code sau nhé:

Mã:

Sub LayDL_HLMT()
    With CreateObject("ADODB.Connection")
        .Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0 Xml;HDR=No"""
        Sheet2.Range("A2").CopyFromRecordset .Execute("Select F1,F2,Sum(Val(F3)),F4,F5,F6,F7,F8 From [Sheet1$A2:H] Group by F1,F2,F4,F5,F6,F7,F8")
    End With
End Sub

haphambk74 · 6/5/22

Hai Lúa Miền Tây đã viết:

Bạn thử code sau nhé:

Mã:

Sub LayDL_HLMT()
    With CreateObject("ADODB.Connection")
        .Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0 Xml;HDR=No"""
        Sheet2.Range("A2").CopyFromRecordset .Execute("Select F1,F2,Sum(Val(F3)),F4,F5,F6,F7,F8 From [Sheet1$A2:H] Group by F1,F2,F4,F5,F6,F7,F8")
    End With
End Sub

mình thử chạy nó báo lỗi ntn, bạn xem lại hộ nhé

Hai Lúa Miền Tây · 6/5/22

haphambk74 đã viết:
View attachment 275485
mình thử chạy nó báo lỗi ntn, bạn xem lại hộ nhé

Vậy bạn thử code sau thử nhé:

Mã:

Sub LayDL_HLMT()
    With CreateObject("ADODB.Connection")
        .Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0 Xml;HDR=No"""
        Sheet2.Range("A2").CopyFromRecordset .Execute("Select F1,F2,count(F3),F4,F5,F6,F7,F8 From [Sheet1$A2:H] Group by F1,F2,F4,F5,F6,F7,F8")
    End With
End Sub

haphambk74 · 6/5/22

Hai Lúa Miền Tây đã viết:

Vậy bạn thử code sau thử nhé:

Mã:

Sub LayDL_HLMT()
    With CreateObject("ADODB.Connection")
        .Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0 Xml;HDR=No"""
        Sheet2.Range("A2").CopyFromRecordset .Execute("Select F1,F2,count(F3),F4,F5,F6,F7,F8 From [Sheet1$A2:H] Group by F1,F2,F4,F5,F6,F7,F8")
    End With
End Sub


		0
		0	material	Code N.1	Code N.2	Code N.3	label
538	59	7	619EV				vien ghe - GB3
1200	296	7	201				op ben - GB3
2216	155	3	619EV				276. mat ghe duoi - GB3
2216	163	3	201				mat truoc - GB3
2216	179	3	201				mat truoc - GB3
2216	262	4	201				mat sau - GB3
2216	382	3	619EV				276. mat ghe duoi - GB3
2216	818	4	201				mat truoc - GB3
2216	1200	4	201				mat sau - GB3
2248	59	4	619EV				vien ghe - GB3
2248	554	4	619EV				mat ghe - GB3

Kết quả ra ntn bị nhiều hơn số lượng thực tế 1 đơn vị, bạn xem lại dùm nhé

Hai Lúa Miền Tây · 6/5/22

haphambk74 đã viết:
0
0
material Code N.1 Code N.2 Code N.3 label
538
59
7
619EV vien ghe - GB3
1200
296
7
201 op ben - GB3
2216
155
3
619EV 276. mat ghe duoi - GB3
2216
163
3
201 mat truoc - GB3
2216
179
3
201 mat truoc - GB3
2216
262
4
201 mat sau - GB3
2216
382
3
619EV 276. mat ghe duoi - GB3
2216
818
4
201 mat truoc - GB3
2216
1200
4
201 mat sau - GB3
2248
59
4
619EV vien ghe - GB3
2248
554
4
619EV mat ghe - GB3

Kết quả ra ntn bị nhiều hơn số lượng thực tế 1 đơn vị, bạn xem lại dùm nhé

Bạn nói mình nghe thử là những dòng trên cái nào bị trùng nhé.

haphambk74 · 7/5/22

Hai Lúa Miền Tây đã viết:
Bạn nói mình nghe thử là những dòng trên cái nào bị trùng nhé.

số lượng đúng ở cột cuối bạn nhé


		0
		0	material	Code N.1	Code N.2	Code N.3	label	số lượng đúng
538	59	7	619EV				vien ghe - GB3	6
1200	296	7	201				op ben - GB3	6
2216	155	3	619EV				276. mat ghe duoi - GB3	2
2216	163	3	201				mat truoc - GB3	2
2216	179	3	201				mat truoc - GB3	2
2216	262	4	201				mat sau - GB3	3
2216	382	3	619EV				276. mat ghe duoi - GB3	2
2216	818	4	201				mat truoc - GB3	3
2216	1200	4	201				mat sau - GB3	3
2248	59	4	619EV				vien ghe - GB3	3
2248	554	4	619EV				mat ghe - GB3	3

Hai Lúa Miền Tây · 9/5/22

haphambk74 đã viết:
số lượng đúng ở cột cuối bạn nhé

0
0
material Code N.1 Code N.2 Code N.3 label số lượng đúng
538
59
7
619EV vien ghe - GB3 6
1200
296
7
201 op ben - GB3 6
2216
155
3
619EV 276. mat ghe duoi - GB3 2
2216
163
3
201 mat truoc - GB3 2
2216
179
3
201 mat truoc - GB3 2
2216
262
4
201 mat sau - GB3 3
2216
382
3
619EV 276. mat ghe duoi - GB3 2
2216
818
4
201 mat truoc - GB3 3
2216
1200
4
201 mat sau - GB3 3
2248
59
4
619EV vien ghe - GB3 3
2248
554
4
619EV mat ghe - GB3 3

Tôi nghĩ bạn đã đổi code hoặc dữ liệu của bạn không phải như file mẫu. Tôi chạy code thì nó ra kết quả như sau:

Tổng hợp dữ liệu các hàng trùng nhau trong bảng excel sang 1 bảng mới

haphambk74

Thành viên mới

File đính kèm

BuiQuangThuan

❆❆❆❆❆❆❆❆❆❆❆❆

Hoàng Tuấn 868

Đăng ký hôm qua

haphambk74

Thành viên mới

HDDP

Thành viên chính thức

haphambk74

Thành viên mới

HDDP

Thành viên chính thức

haphambk74

Thành viên mới

HDDP

Thành viên chính thức

Hai Lúa Miền Tây

❆❆❆❆❆❆❆❆

haphambk74

Thành viên mới

Hai Lúa Miền Tây

❆❆❆❆❆❆❆❆

haphambk74

Thành viên mới

Hai Lúa Miền Tây

❆❆❆❆❆❆❆❆

haphambk74

Thành viên mới

Hai Lúa Miền Tây

❆❆❆❆❆❆❆❆

Bài viết mới nhất

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng