Khớp sản phẩm với số lượng tương ứng (2 người xem)

[hoangtuaotrang_hp_vn]

anh/chị/em giúp em xử lý bảng bên trên bằng Power Query để khớp số lượng theo mã sản phẩm tương ứng để ra được bảng phía dưới với

xin cảm ơn mọi người.

 

[TongDe]

Hướng giải:
Merge column từng cột Sản phẩm+Số lượng,
Chọn Đơn hàng: Unpivot other columns,
Remove Attribute.
Split cột Value

 

[tranhungdao12a3]

Hướng giải:
Merge column từng cột Sản phẩm+Số lượng,
Chọn Đơn hàng: Unpivot other columns,
Remove Attribute.
Split cột Value

Không làm vậy được bạn, bán 1000 sản phẩm thì kết hợp ngất luôn. Tìm giải pháp khác đi

 

[LmoovoenX]

Không làm vậy được bạn, bán 1000 sản phẩm thì kết hợp ngất luôn. Tìm giải pháp khác đi

Dữ liệu không nhiều lắm chắc vẫn dùng hàm được nhỉ

 

[tkhieu]

anh/chị/em giúp em xử lý bảng bên trên bằng Power Query để khớp số lượng theo mã sản phẩm tương ứng để ra được bảng phía dưới với

xin cảm ơn mọi người.

View attachment 296183

Bạn kiểm tra sheet Kết quả xem đúng không

 

[TongDe]

...Không làm vậy được bạn...

Không làm vậy được bạn..

Kiểu này chỉ là chữa cháy thôi...
Cửa hàng bán chừng vài trăm thôi cũng không ai nhập liệu kiểu ấy.
Phải nhập liệu theo dạng table.
Sau đó thì nấu kiểu gì cũng đươc...

 

[bebo021999]

VBA code được không bạn?

 

[ptm0412]

Kiểu nhập liệu phản khoa học nhất tôi từng gặp.
Giả sử không phải bảng nhập liệu mà là bảng trích xuất, hoặc bảng báo cáo đi chăng nữa, cũng là cấu trúc kỳ quặc.

 

[bebo021999]

Kiểu nhập liệu phản khoa học nhất tôi từng gặp.

Cũng bình thường thôi. Có thể vì đặc thù 1 PO không bao giờ quá 5 sản phẩm, nên số cột không bao giờ quá 11 cột.
Thường thì các cột SP và SL xen kẽ nhau như : SP 1 + SL1 + Sp2 + SL2 + ... + SP5 + SL5
Bảng này thì 5 SP xếp cạnh nhau sau đó 5 cột SL xếp cạnh nhau, với mục đích so sánh các loại SP, và cộng dồn SL
Xếp kiểu nào thì xếp, việc trích xuất ra kết quả, với VBA code thì chẳng có gì khó khăn cả.

 

[hocexcel_1991]

Bạn thử tham khảo link này nhé

Chuyển cột thành dòng với vòng lặp trong Power query

Trong power query nếu có 1 loại số liệu đang thiết kế dạng nhiều cột, muốn chuyển thành dòng chỉ cần Unpivot table các cột đó. Trường hợp 2 loại số liệu như số lượng/ thành tiền, doanh thu/chi phí, mỗi nhóm là 2, 3 cột số liệu nối tiếp nhau thì việc unpivot trở nên khó khăn. Với code sau đây...

www.giaiphapexcel.com

không được thì tính tiếp.

 

[ptm0412]

Xếp kiểu nào thì xếp, việc trích xuất ra kết quả, với VBA code thì chẳng có gì khó khăn cả.

Nếu cứ trông chờ vào VBA (mà trông chờ người khác chứ không phải tự làm), rồi muốn nhập liệu kiểu gì cũng được thì suốt đời phải đi hỏi.
Lưu ý là dữ liệu nhập vào khác với báo cáo, dữ liệu phải đúng chuẩn dữ liệu thì nhập liệu cũng dễ, file cũng nhẹ mà ra báo cáo cũng nhanh. Nhập liệu thẳng vào báo cáo thì chỉ được 1 báo cáo, không ra được báo cáo thứ 2.

 

[VetMini]

Data entry nó có một tiêu chuẩn về quy trình. Đại kháí dựa vào kinh nghiệm tích lũy, và quy trình thương mãi.

Bởi vì các nước thế giới thứ ba tiếp xúc với quy trình thương mãi khá chậm. Rồi tiếp liền là máy tính và bảng tính trái rộng. Thế là mạnh ai nấy tự đặt quy trình cho mình.

Rất nhiều công sức lãng phí chỉ để đáp ứng ba cái mớ "tự động" này nọ của các kiểu data entry do người ta tự chế ra.

Những công sức nàu nếu để vào tìm hiểu tiêu chuẩn và thiết kế bảng tính đàng hoàng thì người ta có thể chạy trước dữ liệu (tiên liệu) thay vì chạy theo đuôi chúng (công thức khủng để báo cáo)

 

[tranhungdao12a3]

anh/chị/em giúp em xử lý bảng bên trên bằng Power Query để khớp số lượng theo mã sản phẩm tương ứng để ra được bảng phía dưới với

xin cảm ơn mọi người.

View attachment 296183

Dữ liệu hơi củ chuối, tuy nhiên bạn làm như sau:
Nhân bản cái table dữ liệu trên thành 2 Tables:
Table Số lượng:

Table Sản phảm:

Sau đó bạn Combine hai cái Table này lại rồi xử lý phân tách sử dụng List.Zip:
let
Source = List.Zip({SL[Đơn hàng],SL[Attribute],SL[Value],SP[Đơn hàng],SP[Attribute],SP[Value]}),
#"Converted to Table" = Table.FromList(Source, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
#"Extracted Values" = Table.TransformColumns(#"Converted to Table", {"Column1", each Text.Combine(List.Transform(_, Text.From), ","), type text}),
#"Split Column by Delimiter" = Table.SplitColumn(#"Extracted Values", "Column1", Splitter.SplitTextByDelimiter(",", QuoteStyle.Csv), {"Column1.1", "Column1.2", "Column1.3", "Column1.4", "Column1.5", "Column1.6"}),
#"Removed Columns" = Table.RemoveColumns(#"Split Column by Delimiter",{"Column1.2", "Column1.4", "Column1.5"}),
#"Renamed Columns" = Table.RenameColumns(#"Removed Columns",{{"Column1.1", "Đơn hàng"}, {"Column1.6", "Sản phẩm"}, {"Column1.3", "Số lượng"}}),
#"Changed Type" = Table.TransformColumnTypes(#"Renamed Columns",{{"Số lượng", Int64.Type}, {"Sản phẩm", type text}})
in
#"Changed Type"
Kết quả:

 

[tranhungdao12a3]

Dữ liệu không nhiều lắm chắc vẫn dùng hàm được nhỉ

Dùng hàm List.Zip được bác, nếu không chắc phải dùng vòng lặp

 

[hoangtuaotrang_hp_vn]

Bạn kiểm tra sheet Kết quả xem đúng không

Kết quả đúng rồi, cảm ơn bác

Bài đã được tự động gộp: 30/10/23

VBA code được không bạn?

Vâng, VBA được thì tốt quá anh ơi

Bài đã được tự động gộp: 30/10/23

Nếu cứ trông chờ vào VBA (mà trông chờ người khác chứ không phải tự làm), rồi muốn nhập liệu kiểu gì cũng được thì suốt đời phải đi hỏi.
Lưu ý là dữ liệu nhập vào khác với báo cáo, dữ liệu phải đúng chuẩn dữ liệu thì nhập liệu cũng dễ, file cũng nhẹ mà ra báo cáo cũng nhanh. Nhập liệu thẳng vào báo cáo thì chỉ được 1 báo cáo, không ra được báo cáo thứ 2.

Vâng, cháu hiểu ý chú. Nếu mình tự quy định nhập liệu được thì tốt.
Đây là 1 bài toán mà dữ liệu được xuất ra từ máy sản xuất,
bây giờ người xuất dữ liệu đó ra, họ muốn chuẩn hóa lại để pivot hay trích lọc dữ liệu dễ dàng hơn đó chú

Bài đã được tự động gộp: 30/10/23

Dữ liệu hơi củ chuối, tuy nhiên bạn làm như sau:
Nhân bản cái table dữ liệu trên thành 2 Tables:
Table Số lượng:

Table Sản phảm:

Sau đó bạn Combine hai cái Table này lại rồi xử lý phân tách sử dụng List.Zip:
let
Source = List.Zip({SL[Đơn hàng],SL[Attribute],SL[Value],SP[Đơn hàng],SP[Attribute],SP[Value]}),
#"Converted to Table" = Table.FromList(Source, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
#"Extracted Values" = Table.TransformColumns(#"Converted to Table", {"Column1", each Text.Combine(List.Transform(_, Text.From), ","), type text}),
#"Split Column by Delimiter" = Table.SplitColumn(#"Extracted Values", "Column1", Splitter.SplitTextByDelimiter(",", QuoteStyle.Csv), {"Column1.1", "Column1.2", "Column1.3", "Column1.4", "Column1.5", "Column1.6"}),
#"Removed Columns" = Table.RemoveColumns(#"Split Column by Delimiter",{"Column1.2", "Column1.4", "Column1.5"}),
#"Renamed Columns" = Table.RenameColumns(#"Removed Columns",{{"Column1.1", "Đơn hàng"}, {"Column1.6", "Sản phẩm"}, {"Column1.3", "Số lượng"}}),
#"Changed Type" = Table.TransformColumnTypes(#"Renamed Columns",{{"Số lượng", Int64.Type}, {"Sản phẩm", type text}})
in
#"Changed Type"
Kết quả:

Xin lỗi bác, em chậm tiêu quá, bác gửi file đính kèm em tham khảo với ạ

 

[tranhungdao12a3]

Kết quả đúng rồi, cảm ơn bác

Bài đã được tự động gộp: 30/10/23

Vâng, VBA được thì tốt quá anh ơi

Bài đã được tự động gộp: 30/10/23

Vâng, cháu hiểu ý chú. Nếu mình tự quy định nhập liệu được thì tốt.
Đây là 1 bài toán mà dữ liệu được xuất ra từ máy sản xuất,
bây giờ người xuất dữ liệu đó ra, họ muốn chuẩn hóa lại để pivot hay trích lọc dữ liệu dễ dàng hơn đó chú

Bài đã được tự động gộp: 30/10/23

Xin lỗi bác, em chậm tiêu quá, bác gửi file đính kèm em tham khảo với ạ

Đây bạn: Sử dụng như vậy là được:

 

[bebo021999]

Giải pháp với VBA code:

Option Explicit
Sub tonghop()
Dim st&, i&, j&, k&, rng, res(1 To 100000, 1 To 3)
rng = Range("A2").CurrentRegion.Value
st = (UBound(rng, 2) - 1) / 2
For i = 2 To UBound(rng)
    For j = 2 To st + 1
        If rng(i, j) <> "" Then
            k = k + 1: res(k, 1) = rng(i, 1)
            res(k, 2) = rng(i, j): res(k, 3) = rng(i, j + st)
        End If
    Next
Next
Range("M2:O10000").ClearContents 'Xoa du lieu cu
If k > 0 Then Range("M2").Resize(k, 3).Value = res ' Dan ket qua vao vung M2:O
End Sub