Giúp mình ghép nhiều file thành một file. (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

Tôi tuân thủ nội quy khi đăng bài

hanhnguyen120221cuty

Thành viên mới
Tham gia
16/7/25
Bài viết
7
Được thích
0
Chào anh chị em trong diễn đàn. Mình có 2 file như file đính kèm. Mình muốn ghép lại thành 1 file có các cột như file mẫu. Các bạn giúp mình, mình đã thử dùng power query nhưng mình không làm được..
 

File đính kèm

Viết 1 function để tạo bảng mới:
Mã:
(t as table) =>
let
    // Tạo một bảng mới với tiêu đề cột được lấy từ các giá trị cụ thể trong bảng đầu vào 't'
    KetQua = #table(
        {
            t[Column1]{10}, t[Column1]{9}, t[Column1]{11}, t[Column2]{14},  
            t[Column5]{14}, t[Column3]{14},t[Column4]{14}   },
        {{
            t[Column3]{10},  t[Column3]{9}, t[Column3]{11}, t[Column2]{15},
            t[Column5]{15},  t[Column3]{15},t[Column4]{15}  }}
    )
in
    KetQua

Add Invoke Column và Combine...

Mã:
let
    Source = Folder.Files("C:\Users\Administrator\Downloads"),
    FilteredRows = Table.SelectRows(Source, each Text.StartsWith([Name], "Copy")),
    AddedCustom = Table.AddColumn(FilteredRows, "Custom", each Excel.Workbook([Content])),
    ExpandedCustom = Table.ExpandTableColumn(AddedCustom, "Custom", {"Data"}, {"Data"}),
    InvokedFunction = Table.AddColumn(ExpandedCustom, "fGroup", each fTable([Data])),
    SelectedColumn = Table.SelectColumns(InvokedFunction, {"fGroup"}),
    CombinedTable = Table.Combine(SelectedColumn[fGroup])
in
    CombinedTable
 

File đính kèm

Lần chỉnh sửa cuối:
Chào anh chị em trong diễn đàn. Mình có 2 file như file đính kèm. Mình muốn ghép lại thành 1 file có các cột như file mẫu. Các bạn giúp mình, mình đã thử dùng power query nhưng mình không làm được..
Tham khảo thêm Code VBA trong file đính kèm :
Lưu ý
+các file muốn lấy dữ liệu được cùng chứa trong folder với file mẫu.xlsm
+Sh để lấy dữ liệu của các file nguồn đều có tên là PPL 2025
kết quả từ dòng 10 (để so sánh với kết quả mẫu)
 

File đính kèm

Xin phép xóa bài đăng vì sai chủ đề...
 
Lần chỉnh sửa cuối:
Thao tác lại #5:
1. Giải nén ra Desktop.
2. Rename những file cần tổng hợp bắt đầu bằng Copy****
3. Chạy file TongHop333 , click fải vùng xanh lá, chọn refresh...
 

File đính kèm

Tham khảo thêm Code VBA trong file đính kèm :
Lưu ý
+các file muốn lấy dữ liệu được cùng chứa trong folder với file mẫu.xlsm
+Sh để lấy dữ liệu của các file nguồn đều có tên là PPL 2025
kết quả từ dòng 10 (để so sánh với kết quả mẫu)
Code bài này hay thế mà cũng bị chủ bài bỏ qua không thèm phản hồi, thật tiếc cho công sức của anh quá.
 
Code bài này hay thế mà cũng bị chủ bài bỏ qua không thèm phản hồi, thật tiếc cho công sức của anh quá.
Cảm ơn anh đã xem bài.
Họ không phản hồi vì họ đã được có giải pháp khác tốt hơn.
Chuyện này cũng là bình thường mà. Giúp người khác là giúp mình mà
Biết đâu 1 ai đó lại cần đến để giải quyết bài toán tương tự thì cũng chả uổng công.
Chỉ buồn là khi đã bỏ công ra giúp, đã không nhận được hồi âm (lời tương tác, cảm ơn hay, 1 nút like,...) mà lại nhận được Excel C ( theo cách nới của anh SA_DQ), hay gạch đá,...Nhưng cũng có cái hay là có thế mới biết muôn nẻo của " Cho đi để nhận lại" là thế nào.
 
Cảm ơn anh đã xem bài.
Họ không phản hồi vì họ đã được có giải pháp khác tốt hơn.
Chuyện này cũng là bình thường mà. Giúp người khác là giúp mình mà
Biết đâu 1 ai đó lại cần đến để giải quyết bài toán tương tự thì cũng chả uổng công.
Chỉ buồn là khi đã bỏ công ra giúp, đã không nhận được hồi âm (lời tương tác, cảm ơn hay, 1 nút like,...) mà lại nhận được Excel C ( theo cách nới của anh SA_DQ), hay gạch đá,...Nhưng cũng có cái hay là có thế mới biết muôn nẻo của " Cho đi để nhận lại" là thế nào.
Nếu em rơi vào trường hợp này thì lần sau nhìn thấy là em "né" luôn. Tránh gặp lại cảnh phải ăn "Sầu riêng" lần nữa.
 

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

Back
Top Bottom