Kết quả tìm kiếm cho từ khóa: tách sheet theo điều kiện

hiện em có 1 file cần thực hiện tách sheet sheet tổng cần tách ra nhiều sheet nhỏ như mẫu với điều kiện đặt ở cột A. tên sheet tách được đánh số theo tên sheet gốc và số lấy theo dữ liệu tách của cột A nhờ các bác hỗ trợ ạ !

Một giải pháp bỏ luôn 3 cột E, F và G bên Sheet List Nhat Ky, chỉ dùng code tham chiếu và tách dữ liệu đưa vào Sheet Nhat Ky luôn. Bạn tham khảo file.

Thử code nếu file đã có rồi nó sẽ thay bằng file mới. Sub tachfile() Application.ScreenUpdating = False Application.DisplayAlerts = False Dim i As Long, lr As Long, dic As Object, dk As String, duonglink As String, arr, kq, a As Long, wb As Workbook, sh As Worksheet Dim wb1 As Workbook...

Trong khi chờ anh Snow hãy tham khảo code củ chuối này xem sao. Option Explicit Sub NgocTuyen1995() Dim i&, j&, t&, k&, Lr&, R&, LrWs& Dim Arr(), KQ(), Res() Dim Dic As Object, Fso As Object, Key Dim Ws As Worksheet, Sh As Worksheet, Wb As Workbook Dim File As Variant Dim Path With...

Tại sao không để chung vào 1 file mà lại để 2 file vậy bạn.Mất công mở file lên rồi lại đóng file.

...ra sao, mong cả nhà giúp đỡ ạ Em có 02 File: File Danh Sach và File Data_Total (gần 100 sheet) Ấn vào nút Run: sẽ tự động Tách Sheet theo điều kiện Code Sold To (Cột B) File Danh Sach Map với điều kiện Range("C15") theo từng sheet ở File Data_Total, nếu thỏa điều kiện thì sẽ save File theo...

Chào các anh chị và các bạn, lâu quá không có lên diễn đàn, nay rảnh rỗi có dịp quay lại nên xin đóng góp một chút, một bộ công cụ Addin do mình tổng hợp, có code mình viết, có code của người khác (sorry do hầu hết các code nếu của người khác mình đều sửa lại nên không để nguồn). Hi vọng có thể...

Dạ là công thức tham chiếu trong Sheet 2 ạ. Dạ cảm ơn góp ý từ Anh ạ. Nhu cầu em cần là file khi được tách ra theo từng phòng ban thì vẫn sẽ có Sheet 2 vì Sheet 2 đang có công thức tham chiếu từ Sheet 1. Nhưng nếu chỉ là tìm từng phòng ban để filter rồi tách ra file riêng thì file đó đang thiếu...

Sao bạn thay vị viết là "A/C giúp.." mà viết là "Anh, chị giúp" nó vừa tôn trọng và cầu thị hơn không? Theo tôi bạn nên làm theo hướng này: 1/ Dùng vòng lặp duyệt từng Ô của cột B hoặc D (nếu đưa vào mảng thì là cột 2 hoặc 4 - với mảng Arr=Range("A9:D và dòng cuối) Nếu len(Arr(i,4) <=10 thì...

Khi tách dữ liệu ra thành cách sheet Thì điều kiện là mà cột GT ấy chỉ có là BDO, DNO, HCM và lấy luôn các Location ấy làm tên sheet- và tên sheet chỉ là duy nhất, như vậy các sheet cũ sẽ bị xóa đi thay vào đó là các sheet mới tạo. Nếu giữ lại các sheet có sẵn trong workbook thì khi được dữ...

Thêm sub tạo danh sách Option Explicit Sub XYZ() Dim arr(), resDT$(), res(), wb As Workbook, sh As Worksheet, dic As Object Dim sRow&, sCol&, j&, i&, r&, k&, ik&, DT$, fDay&, eDay&, tDay Set sh = ThisWorkbook.Worksheets("Tach KH") Set dic = CreateObject("Scripting.Dictionary") On...

Không cần sheet trung gian. Kiểm tra lại Option Explicit Sub XYZ() Dim arr(), resDT$(), res(), wb As Workbook, sh As Worksheet, dic As Object Dim sRow&, i&, k&, ik&, DT$, fDay&, eDay&, tDay Set sh = ThisWorkbook.Worksheets("Tach KH") Set dic = CreateObject("Scripting.Dictionary") On...

Mình đang có code lấy hết dữ liệu từ file dulieu.xlsx chép qua file Trich DuLieu TheoNgay bằng cách vào Sheet Tach KH, bấm nút VIP. Hiện do cơ chế thay đổi, mình muốn thêm điều kiện để chỉ chép dữ liệu ở file dulieu.xlsx theo Ngày mong muốn (định dạng 15/01/2023 18:27:29, cột AO, đang tô màu...

Mô tả này khác với ý định bán đầu. Duyệt qua sheet. Lấy tên sheet làm điều kiện lọc. Rồi copy qua. Còn không thì dùng mảng

Em cảm ơn Anh, Anh rất tinh ý, code của Anh @Hoàng Tuấn 868 và Bạn @BuiQuangThuan em thấy đã chạy đúng theo nhu cầu của em. Nếu Anh giúp em code có điều kiện tháng nữa thì tốt cho em quá.

Bạn thử test lại: Sheet Dulieu2: Thay 1 vài dòng từ tháng 11 sang tháng 12 Bên sheet báo cáo, dòng 2, thay điều kiện là 12 và 2022 Dòng 5 từ 1/12/2022 đến 31/12/2022 KQ sẽ sai. Nếu yêu cầu của bạn đã thỏa thì OK. Nhưng thành thật khuyên bạn nên dùng file này cho nhiều tháng. Bên sheet Dulieu...

Chào Anh/Chị, Em có 1 file dữ liệu gồm 1 sheet Tổng hợp , Giờ muốn tách sheet tổng hợp này thành nhiều sheet chia theo Brand ạ Em cảm ơn ạ

Nghiên cứu tách theo mảng array và dictionary nhé.Mà tách thì cần thêm 1 sheets mẫu chỉ điền dữ,liệu không cần format lại.

Thanks bạn rất nhiều, nhưng sau 1 tuần vật vã với cái file này thì mình xin bó tay :(. Vẫn phải học hỏi... gần như lại từ đầu ạ. Code trên chạy ổn trong file với ít biến, nhiều hơn nữa máy mình đơ luôn, với lại khai báo thêm biến rất nhiều. Code của anh mình ưng ý nhất nhưng khi áp dụng vào...

Em chào anh, em đã thử, nhưng cột ngày tháng bị nhảy sai một vài chỗ, em đã bôi vàng và đính kèm file bên dưới ạ. Mong anh giải đáp 1665114415 Dạ vâng, em cảm ơn ạ. Để em áp dụng thử ạ