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

Xin chào các Anh, Chị Vui lòng hỗ trợ file thống kê ngày hết hạn của sản phẩm - mình đang làm thống kê theo dạng PivotTable nên chưa có nhiều sự lựa chọn tốt nhất nên nhờ hỗ trợ bằng VBA theo như Sheet "PV" (file đính kèm) và hình minh họa bên dưới: 1. Ở B1 nếu chọn khu vực "Miền Tây" và điều...

Bạn đọc kỹ lại những gì bạn viết xem có mâu thuẩn không. Xác định lại từng phần: 1. có phải trong sheet File 1 có khoảng 80 000 dòng, chứa khoảng 2000 mã khác nhau hay không 2. Vậy 2000 mã này sẽ được nằm riêng ở các sheet

Dạ không phải tách theo từng sheet là từng mã anh. Mà một sheet có thể nhiều mã. Nhưng với điều kiện là không để dữ liệu một mã mà chia ra ở 2 sheet á anh.

Thì bạn thay chỗ tô đậm trong công thức =IF(ISERR(FIND("ID";D3;1));0;MID(D3;SEARCH("ID";D3;1)+3;8)) thành H5*G5*5%) Khuyên bạn : Lần sau có hỏi bài thì: 1/ Tuân thủ đúng nội quy diễn đàn, Không nên sử dụng những từ viết tắt( ngôn từ chít chát), Tiếng tây bồi, tiếng tàu, phim chưởng,.... Hãy sử...

Em add vào thì hiện thông báo này không sử dụng được ạ!

cho mình xin đoạn gửi email tính lương cho nhiều người trên outlook với

Cảm ơn anh ạ, anh khiêm tốn chứ anh biết nhiều hơn em gấp trăm lần ấy ạ. Em là dân tuyển khoáng (tuyển tách khoáng sản), nhưng em lại có một đam mê lập trình ạ, nên em học mót trên mạng thêm ít nào đó thôi để thỏa mãn niểm đam mê thôi ạ, chứ em cũng không biết mấy đâu ạ. Hiện tại em đang sử dụng...

Bỏ dấu " Thành Hãy thử xem.

Chào mọi người, Mình đang cần tách sheet "Total" thành các file nhỏ và tự động lưu thành các file mới Ý tưởng: tạo thêm 1 sheet mới chứa điều kiện lọc theo tên Sale rồi dùng autofilter. Code phía dưới mình chạy toàn ra file chưa mỗi dòng tiêu đề. Nhờ mn xem và sửa giúp mình ạ Sub taods() Dim...

Lọc listbox nhiều cột Lọc 1 cột Tôi đã thấy nhiều form có thiết kế lọc listbox theo từ khóa, gõ vài ký tự vào 1 textbox, gõ đến đâu list được lọc ngắn đến đó. Đại khái là vầy: Gõ tìm kiếm khách hàng 1 ký tự f Gõ tiếp r thành fr Gõ tiếp fr*2 . Lưu ý có thể dùng dấu * trong search key Như...

Tại sao lại nói như thế? Trước tiên hãy nói về việc đặt tên cho con. Cha mẹ đặt tên cho con từ xưa đến nay có nhiều khuynh hướng: - Đặt tên xấu để không bị thế lực nào đó bắt. Đó là lâu rồi, bây giờ chắc không còn nữa - Đặt tên theo nguyện vọng của cha mẹ: Thái Bình, Thống Nhất, Hòa Bình, ...

Bạn đã chạy code chưa? Có đúng là nó cho ra các sheets theo thứ tự 1, 2,3 và trong đó chỉ có các Lot 1,2,3 tương ứng.

code này chỉ sao chép, thiếu đoạn lọc và xóa dữ liệu theo điều kiện ở cột A : phân loại theo số thứ tự đó, và mỗi sheet nhỏ ( sau tách ) chỉ lấy 1 điều kiện là 1 số đó thôi

Trong khi chờ các giải pháp khác hãy thử tham khảo code sau: Option Explicit Sub TachSheet() Dim i&, j&, Lr& Dim Sh As Worksheet, Ws As Worksheet Set Sh = Sheets("26.6.2023") Lr = Sh.Cells(100000, 1).End(xlUp).Row For i = 1 To Application.Max(Sh.Range("A8:A" & Lr)) Sh.Select Sh.Copy...

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...