Lọc dữ liệu, tách dữ liệu từ 1 ra nhiều bảng tính (Worksheets) – Học VBA trong excel 16



Khoá học “Hãy để VBA giúp bạn tăng năng suất làm việc”:

▷ Video được cung cấp miễn phí bởi
▷ Facebook Page:
Bài này sẽ hướng dẫn các bạn cách dùng VBA để lọc dữ liệu 1 bảng tính rồi tách dữ liệu đó ra nhiều bảng tính khác nhau. Trong bài có sử dụng khái niệm cấu trúc dữ liệu từ điển (dictionary), vòng for, for each, lệnh if …

▷ Video được cung cấp bởi
▷ Facebook Page:
▷ Facebook Group:

Download:

Xem thêm video học và các thủ thuật excel: https://mindovermetal.org/thu-thuat-excel/

21 Comement tại “Lọc dữ liệu, tách dữ liệu từ 1 ra nhiều bảng tính (Worksheets) – Học VBA trong excel 16”

  1. ĐT Nguyễn [Học Excel Online] October 20, 2020 at 3:55 am

    Học Excel cùng ĐT Nguyễn:

    ▷ Khoá học "Học Excel, Có Việc Ngay": ​http://bit.ly/ex101_dtnguyen

    ▷ Xem ngay "Tự động hoá Excel và báo cáo với VBA": http://bit.ly/vba101_dtnguyen

    ▷ Theo dõi Facebook cá nhân: https://fb.me/kuldokk

    ▷ Blog cá nhân: https://blog.hocexcel.online

    ▷ Video được cung cấp miễn phí bởi https://hocexcel.online

    ▷ Facebook Group: http://bit.ly/heoFBG



    Khám phá thêm thật nhiều kiến thức với Học Excel Online:

    🔑 Học Excel, Có Việc Ngay: ​https://www.hocexcel.online/ex101

    🔑 Hãy để VBA giúp bạn: https://www.hocexcel.online/vba101

    🔑 Hiểu và phân tích dữ liệu với Excel: ​https://www.hocexcel.online/dv101​

  2. Em chao anh. Em đã thử theo phuong phap anh dạy đã thành công. Nhưng khi em tách xong cột 4. Em muốn tách tiếp thêm các cột khác trong bảng thì bị lỗi. Nhờ anh chỉ bảo thêm

  3. chào a! cho e hỏi về vấn đề quản lí công cụ dụng cụ. ban đầu mình theo dõi công cụ dụng cụ nhập xuất tổng hợp( máy móc thiết bị;lán trại;cospha;thép tấm..)trong một sheep tổng hợp . giờ em muốn lọc dữ liệu từ sheet tổng hợp ra nhiều sheet. ví dụ giả sử ngày 1/1/12016 nhập các loại (cospha thép tấm. mm thiết bị..) trong sheet tổng hợp. thì sheet máy móc thiết bị; sheet cospha…tự động theo dõi thì phải dùng lệnh lọc như thế nào. e cảm ơn

  4. Nguyễn Luân Sharing October 20, 2020 at 3:55 am

    Admin cho em hỏi cái ạ,em làm theo hướng dẫn như video với bảng excel khác và đã làm thành công,nhưng khi ấn save lại,em đã chọn yes để save luôn code VBA nhưng khi mở lên ấn alt+F11 để mở macro thì ko xem được code như những file tải về của anh.Hướng dẫn em lưu được cả code như file của anh vs ạ.

  5. anh ĐT Nguyên [Excel] Ơi? em muốn hỏi là em chỉ muốn copy ra các sheet! với giá trị trung nhau trong cột B,giá trị duy nhất không tổng hợp ra sheet! khác, thì thêm đoạn code nào ạ?em thử với đoạn code của anh dồi.nhưng thấy những tên duy nhất cũng xuất hết ra sheet! khác.dữ liệu của em có 2000 người anh ah.chỉ dẫn giúp em với! em cám ơn anh nhiều!

  6. với excell 2003 có được ko anh ĐT Nguyên ơi ?

  7. bạn làm hay lắm, nhưng có thể tạo thành 1 cái tool tổng quát để dùng cho mọi file, mọi sheet được ko bạn, ví dụ tương tự như cái tool SheetRenamer của bạn đã làm ấy

  8. Dạy hay lắm, say mê quên cả bấm like. Lại bị nhắc nhỏ nữa. Cảm ơn rất nhiều

  9. Anh ở đâu thế, em thích nghe giọng nói của anh 🙂

  10. ad cho mình xin số điện thoại đc ko mình muốn học trực tiếp mấy cái vs số của mình 0971240111

  11. Anh cho em hỏi là lệnh này chỉ lọc và tách ra chứ ko phải copy nguyên cả row trong sheet gốc sang các sheet mới ạ? e có gặp vấn đề là e muốn copy cả hàm ở sheet gốc sang các sheet mới. Mong a chỉ bảo giúp!
    e tks!

  12. Rất cám ơn những chia sẻ của anh!

  13. dear DT Nguyễn
    ở Hà nội bạn có tổ chức off-line ko nhỉ
    dt của tôi 0982509827

  14. If Not Evaluate("=ISREF('" & v & "'!A1)") Then
    Bạn ơi, câu lệnh trên ý nghĩa là gì
    Nếu ô bắt đầu cần copy của mình là ô D10 thì minh thay A1 bằng D10 à

  15. Rất hay, cảm ơn nhiều…………….

  16. Với dữ liệu là tích lọc ra 3 sheet khác thì không bị lỗi gì.
    Khi mà mình có 1 table muốn trích lọc ra 16 sheet khác thì khi chạy Debug nó bị lỗi cái dòng thế này. Nay nhờ Admin giúp đỡ được không. Chạy Debug bị bôi vàng dòng này mà không biết cách nào sữa cả
    (Sheets.Add(after:=Worksheets(Worksheets.Count)).Name = v)

  17. Câu lệnh If Not Evaluate("=ISREF('" & v & "'!A1)") nghĩa là gì ạ. Anh có thể làm 1 video riêng về dictionary không ạ. thankyou anh

  18. DT Nguyen giup toi trường hợp này nhé. Trên cột header tôi không muốn lọc hết nội dung mà muốn lọc theo like "???" hoặc like "***" thì cấu trúc VBA như thế nào. Khi thu macro để xem cấu trúc từ báo cáo của tôi, số lượng lơn qua nên không xem được. Địa chỉ email của tôi: phongvenhatan@gmail.com.

    Thanks & best regards,
    Giang.

  19. ĐT Nguyễn [Excel]: Mình có một chút công việc như thế này, nhờ bạn giải quyết nó bằng VBA được không, cảm ơn bạn
    Mô tả: Mình có 1 danh sách khoảng 600 sinh viên, sau đó mình xếp nó theo 1 tiêu chí nào đó, sau khi sắp xếp xong, mình đánh số báo danh từ 1 đến hết và mình bắt đầu công việc chia danh sách đó thành các phòng thi, mỗi phòng thi là một sheet theo một form định dạng có sẵn gồm có các thông tin: Tên kỳ thi, ngày thi, phòng thi, danh sách sinh viên, và một số thông tin về chữ ký giám thị, số lượng dự thi, số lượng vắng, số lượng bị lập biên bản.. , tuy nhiên, mỗi phòng thi lại có số lượng khác nhau, tùy vào độ rộng khác nhau, dó đó mình phải làm thủ công, và cứ mỗi tháng mình phải làm 1 lần, rất mong bạn giúp mình công việc này, xin cảm ơn bạn rất nhiều

  20. Anh DT Nguyễn Excell ơi. Anh cho em xin địa chi group Facebook được không ạ để em post thông tin lên a.

  21. Vậy à anh DT Nguyễn em nghỉ anh có thể mở lớp chia sẽ kinh nghiệm lập trình cho các bạn qua skype cũng rất tốt đấy a. Rất nhiều anh, em cần kiến thức lập trình nhưng các lớp học còn rất hạn chế.

Để lại ý kiến của bạn:

Your email address will not be published. Required fields are marked *