Trang 1/3 1 2 3 cuốicuối
Hiển thị kết quả tìm kiếm từ 1 đến 10 trên tổng số: 22
  1. #1
    Tham gia ngày
    09 2008
    Nơi Cư Ngụ
    TP.HCM
    Bài gởi
    4,240
    Cảm ơn
    485
    Được cảm ơn 4,726 lần trong 2,801 bài viết

    Tách, gộp dữ liệu trên nhiều file

    Thấy có nhiều bạn hỏi về tách, gộp dữ liệu trên nhiều file Excel. Tôi xin gửi tặng các bạn file mà tôi đang dùng để thực hiện việc này.

    Bạn nào không rõ về cách sử dụng thì có thể hỏi tại topic này.
    Ai có nhu cầu sử dụng nhiều thì có thể save thành Add-in để dùng cho tiện.

    Mong nhận được nhiều ý kiến đóng góp để Add-in này được hoàn thiện hơn.
    Tập tin đính kèm Tập tin đính kèm


  2. #2
    Tham gia ngày
    03 2008
    Nơi Cư Ngụ
    Đồng ruộng Long An
    Bài gởi
    5,603
    Cảm ơn
    8,723
    Được cảm ơn 9,892 lần trong 4,429 bài viết
    Khi mở form, click chọn Tab 2, xong click sang tab khác, chọn lại tab2 nó lỗi ở dòng sau:

    Code:
    Private Sub CBSelectBookSh_Change()
    On Error Resume Next
    Dim Sh As Worksheet
        Windows(CBSelectBookSh.Value).Activate
        LBDataSh.Clear
        For Each Sh In ActiveWorkbook.Sheets
            LBDataSh.AddItem Sh.Name
        Next
    End Sub
    Già của tuổi trẻ, trẻ của tuổi già.

  3. Thành viên sau cảm ơn Hai Lúa Miền Tây về bài viết này:


  4. #3
    Tham gia ngày
    09 2008
    Nơi Cư Ngụ
    TP.HCM
    Bài gởi
    4,240
    Cảm ơn
    485
    Được cảm ơn 4,726 lần trong 2,801 bài viết
    Trích Nguyên văn bởi domfootwear View Post
    Khi mở form, click chọn Tab 2, xong click sang tab khác, chọn lại tab2 nó lỗi ở dòng sau:

    Code:
    Private Sub CBSelectBookSh_Change()
    On Error Resume Next
    Dim Sh As Worksheet
        Windows(CBSelectBookSh.Value).Activate
        LBDataSh.Clear
        For Each Sh In ActiveWorkbook.Sheets
            LBDataSh.AddItem Sh.Name
        Next
    End Sub
    Tôi test nhiều lần vẫn không thấy xuất hiện lỗi như anh nói. Nhờ mọi người kiểm tra lại giùm.

  5. Thành viên sau cảm ơn huuthang_bd về bài viết này:


  6. #4
    Tham gia ngày
    03 2008
    Nơi Cư Ngụ
    Đồng ruộng Long An
    Bài gởi
    5,603
    Cảm ơn
    8,723
    Được cảm ơn 9,892 lần trong 4,429 bài viết
    Trích Nguyên văn bởi huuthang_bd View Post
    Tôi test nhiều lần vẫn không thấy xuất hiện lỗi như anh nói. Nhờ mọi người kiểm tra lại giùm.
    Bạn xem cái lỗi nó nhé

    Già của tuổi trẻ, trẻ của tuổi già.

  7. Thành viên sau cảm ơn Hai Lúa Miền Tây về bài viết này:


  8. #5
    Tham gia ngày
    08 2009
    Nơi Cư Ngụ
    Miền Tây quê hương tui
    Bài gởi
    1,078
    Cảm ơn
    1,677
    Được cảm ơn 1,207 lần trong 705 bài viết
    Trích Nguyên văn bởi domfootwear View Post
    Bạn xem cái lỗi nó nhé
    Em không thấy lỗi này không biết sao nữa mà máy em không bị lỗi
    T0 huuthang sao mình test thì nó luôn cho ra workbook mới vậy mà với lại không đúng yêu cầu của mình nó chỉ gom dữ liệu vào 1 sheet thôi không phải từng sheet không biết sao nữa, bạn xem lại giúp nhen. Thanks
    Sông nước Miền Tây

  9. #6
    Tham gia ngày
    09 2008
    Nơi Cư Ngụ
    TP.HCM
    Bài gởi
    4,240
    Cảm ơn
    485
    Được cảm ơn 4,726 lần trong 2,801 bài viết
    Trích Nguyên văn bởi nmhung49 View Post
    Em không thấy lỗi này không biết sao nữa mà máy em không bị lỗi
    T0 huuthang sao mình test thì nó luôn cho ra workbook mới vậy mà với lại không đúng yêu cầu của mình nó chỉ gom dữ liệu vào 1 sheet thôi không phải từng sheet không biết sao nữa, bạn xem lại giúp nhen. Thanks
    Cái này là tôi viết chung, có thể dùng cho nhiều trường hợp nên kết quả sẽ được kết xuất ra một file mới. Và kết quả chỉ lưu vào 1 sheet. Nêu muốn áp dụng riêng cho trường hợp của bạn bạn phải sửa code lại theo nhu cầu của mình.

  10. #7
    Tham gia ngày
    08 2009
    Nơi Cư Ngụ
    Miền Tây quê hương tui
    Bài gởi
    1,078
    Cảm ơn
    1,677
    Được cảm ơn 1,207 lần trong 705 bài viết
    Trích Nguyên văn bởi huuthang_bd View Post
    Cái này là tôi viết chung, có thể dùng cho nhiều trường hợp nên kết quả sẽ được kết xuất ra một file mới. Và kết quả chỉ lưu vào 1 sheet. Nêu muốn áp dụng riêng cho trường hợp của bạn bạn phải sửa code lại theo nhu cầu của mình.
    Vậy Huuthang có thể giúp mình sửa code lại được không, thật sự nhìn vào đoạn code của bạn mình không hiểu bắt đầu từ đâu hết. Thanks
    Sông nước Miền Tây

  11. #8
    Tham gia ngày
    09 2008
    Nơi Cư Ngụ
    TP.HCM
    Bài gởi
    4,240
    Cảm ơn
    485
    Được cảm ơn 4,726 lần trong 2,801 bài viết
    Trích Nguyên văn bởi nmhung49 View Post
    Vậy Huuthang có thể giúp mình sửa code lại được không, thật sự nhìn vào đoạn code của bạn mình không hiểu bắt đầu từ đâu hết. Thanks
    Trường hợp của bạn thì tôi viết riêng cho bạn file này.

    Bạn cũng có thể dùng file ở bài #1 topic này gộp hết dữ liệu vào 1 sheet sau đó viết code để tách ra thành nhiều sheet theo nhu cầu của bạn.
    Tập tin đính kèm Tập tin đính kèm

  12. Có 3 thành viên cảm ơn huuthang_bd về bài viết này:


  13. #9
    Tham gia ngày
    08 2009
    Nơi Cư Ngụ
    Miền Tây quê hương tui
    Bài gởi
    1,078
    Cảm ơn
    1,677
    Được cảm ơn 1,207 lần trong 705 bài viết
    Trích Nguyên văn bởi huuthang_bd View Post
    Trường hợp của bạn thì tôi viết riêng cho bạn file này.

    Bạn cũng có thể dùng file ở bài #1 topic này gộp hết dữ liệu vào 1 sheet sau đó viết code để tách ra thành nhiều sheet theo nhu cầu của bạn.
    Cái này mình sẽ nghiên cứu để viết code tách ra theo hướng này. Code bạn rất đúng với ý mình xin cảm ơn bạn Huuthang nhiều
    Sông nước Miền Tây

  14. #10
    Trong thể Join data from multiple tất cả các sheet hiện lên. Mình muốn xóa vĩnh viễn 1 hoặc nhiều sheet này thì phải làm sao?. Xin tác giã hướng dẫn thêm.Xin cám ơn

  15. Thành viên sau cảm ơn thaithien09 về bài viết này:


Trang 1/3 1 2 3 cuốicuối

Thông tin về chủ đề này

Users Browsing this Thread

Hiện có 1 người đang xem đề tài này. (0 thành viên và 1 khách)

Bookmarks

Bookmarks

Quyền Sử Dụng Ở Diễn Ðàn

  • Bạn không thể đăng đề tài mới
  • Bạn không thể đăng trả lời
  • Bạn không thể đăng file đính kèm.
  • Bạn không thể sửa bài viết.
  •  

Mudim v0.8 Tắt VNI Telex Viqr Tổng hợp
Chính tả Bỏ dấu kiểu mới  [Bật/Tắt (F9)]