Ghép nhiều fiel giống nhau về trường dữ liệu thành 1 file duy nhất

[Phamanh1998]

Em xin chào Anh/Chị . Em chúc Anh/Chị có một ngày làm việc mới hiệu quả ạ.
Hiện tại em đang có một số file excel tải từ phần mềm xuống hàng ngày, em muốn gộp thành 1 file duy nhất (hiện nay em mở từng file lên và copy nội dung bên trong nên tốn nhiều thời gian). Em mong Anh/Chị giúp đỡ. Em chân thành cảm ơn ạ

 

[Ronaldinho7]

Em xin chào Anh/Chị . Em chúc Anh/Chị có một ngày làm việc mới hiệu quả ạ.
Hiện tại em đang có một số file excel tải từ phần mềm xuống hàng ngày, em muốn gộp thành 1 file duy nhất (hiện nay em mở từng file lên và copy nội dung bên trong nên tốn nhiều thời gian). Em mong Anh/Chị giúp đỡ. Em chân thành cảm ơn ạ

file nguồn có nhiều sheet không bạn?!
Cái này bạn có thể tìm hiểu Power Query, hoặc code VBA gộp dữ liệu nha!
Dạng này trên GPE nhiều lắm!

 

[Phamanh1998]

file nguồn có nhiều sheet không bạn?!
Cái này bạn có thể tìm hiểu Power Query, hoặc code VBA gộp dữ liệu nha!
Dạng này trên GPE nhiều lắm!

File nguồn là file trên ạ, mỗi lần tải về là 1 file như đó và chỉ có 1 sheet trong 1 file. Anh/Chị cho em xin hướng dẫn hoặc code VBA em đã thử tìm mà không thấy ạ

 

[tieutuvodanh192]

Tổng hợp (gộp) nhiều sheet của 1 file Excel, nhiều file trong folder bằng Power Query nâng cao

I. Tổng hợp (gộp) nhiều sheet trong 1 file Thông thường và với trình độ căn bản, khi muốn gộp (tổng hợp) nhiều sheet trên cùng 1 file Excel bằng Power query, các bạn tạo mỗi sheet 1 query con, sau đó Append chúng lại với nhau. Như vậy sẽ có nhiều query con mất công quản lý chúng. Các cách làm...

www.giaiphapexcel.com

Bạn đọc bài này của thầy Mỹ xem nha, chắc bạn sẽ làm được thôi.

 

[fso56]

Bạn dùng power query cho tất cả cà file excel cần gộp vào cùng một folder. Mỗi lần có thêm file cần gộp mới hoặc dữ liệu trong file excel có thay đổi thì file tổng sẽ tự thay dổi theo.

 

[Kiều Mạnh]

tôi xem 2 file bài số 1 mỗi file có 1 sheet ... gợi ý cho vầy ha

1/ nhét hết các file đó vào 1 folder gì đó tùy thích
2/ dùng code duyệt lần lượt từng file trong foder đó
3/ code chạy tới đâu lấy dữ liệu cùa file đó gán lên Sheet là xong
....
4/ mục số 2 phổ thông nhất dùng Fso mà duyệt = code trên này có rồi = tìm là thấy
5/ mục số 3 cũng thế code ADODB trên này có rồi tìm là thấy = Copy chỉnh lại chút theo ý mình là xong
6/ không nên dùng Workbook. Ó pần .... vì kẹt lắm ... code két mấy người kém ADODB họ mới dùng hoặc tò te code thì dùng thôi
...
thong thả dò tìm là ra ... lâu thật lâu nếu hết ko ai giúp tôi sẻ Úp cái DLL của tôi lên cho mà dùng mà thực ra úp lên hết rồi chịu tìm cũng ra thôi

 

[Kiều Mạnh]

Tuần từ hóa các bước sẽ làm như hình sau

1/ Nó sẻ lấy hết tất cả các Sheet trên 1 File = có bao nhiêu lấy hết
2/ Nó sẻ lấy hết tất cả các File Excel trong Folder xx




Cấu trúc và tình tự code sẽ như sau

Sub TongHop_GetListFile()
    Dim ListFiles() As String
    Dim ObjFile As Variant, FolderPath
    Dim Arr As Variant
    Dim i As Long, SQL As String
    Dim Exten As String
  
    FolderPath = "D:\Database_Server"
    Rem Exten = ".xls;.xlsx;.xlsm;.xlsb;.mdb;.accdb"
    Exten = ".xls;.xlsx"
    Cells.ClearContents
  
    ListFiles = ListFileExtenToArray(FolderPath, Exten)
  
    For Each ObjFile In ListFiles
        'Debug.Print ObjFile
        Arr = ListTableNamesA(ObjFile)
        For i = LBound(Arr) To UBound(Arr)
            'Debug.Print Arr(i)
            SQL = "select * from " & Arr(i)
            Debug.Print SQL
            Call CopyDataSetToRange(ObjFile, SQL, [A65536].End(3)(2), True) ''true= lay Tieu de; Flase = No
        Next
    Next
End Sub

Chỉ với 1 Hàm duy nhất là bạn có thể tùy biến lấy các CSDL bao gồm ( Excel + Access + SQLite ++++ .... Nếu tôi thích viết thêm nó vào )

Nhưng với phạm vi Excel thì 3 cái chữ To màu đen là đủ tốt rồi

Bài đã được tự động gộp: 25/11/22

Hình sau như mô tả mục số 2 và 3 của bài số 6 duyệt file tới đâu lấy tới đó

thong thả dò đi he

 

[fso56]

Của bạn đây.

Bạn phải thay link chứa nguồn foder của bạn là ok

 

[Kiều Mạnh]

cứ thong thả đi rảnh Tôi sẽ làm vài cái mô phỏng theo của Ms hình khoanh tròn sau

 

[Kiều Mạnh]

ai có nhu cầu vui lòng qua link sau tham khảo thêm

Add-Ins Cho Excel - Tổng Hợp Dữ Liệu Sheet Và File

1/ Tôi thấy nhiều bạn có như cầu Tổng hợp dữ liệu Sheet và File có cấu trúc dữ liệu như nhau 2/ Trong AddIns tôi úp phía dưới là 1 bộ siêu tập SQL trong đó bao gồm một số tiện ích khác 3/ phạm vi chủ đề này tôi chỉ giới thiệu 1 tiện ích nhỏ tổng hợp dự liệu theo Sheet và File có cấu trúc dữ liệu...

www.giaiphapexcel.com