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

Nhờ mọi người giúp em với ạ. Em có 1 file gồm 5 sheets: 1. Sendemail: Gồm thông tin Khối- tiêu chí filter, pass: password của file. 2. Database: Gồm thông tin cần filter. Cột D 3. AttachEmail: sheet hiện thị thông tin filter 4. Fix: Sheet cố định. Em muốn tách ra file khác nhau, mỗi file gồm...

Bạn thử dùng thủ tục dưới đây nhé! Sub XuLyDuLieu() Dim e As Long Dim shtData As Worksheet, shtKetQua As Worksheet Set shtData = Worksheets("Data") Set shtKetQua = Worksheets("Ket_qua") e = shtData.Range("D" & shtData.Rows.Count).End(xlUp).Row With shtData.Sort...

Kính gửi anh chị, Em có dữ liệu đầu vào như sheet Data. Giờ em muốn lọc tách biệt theo từng Tên màu cách nhau một dòng và theo điều kiện Ngày xuất lớn hơn bằng tại C1 và nhỏ hơn bằng C2 như kết quả tại sheet Ket_qua thì làm thế nào ạ. Em cảm ơn anh chị ạ !

Sửa lại code của bạn 1 chút. Bạn tham khảo nhé! Sub LOC_DU_LIEU() Application.ScreenUpdating = False Dim dic As Object Dim arr(), kq() Dim i, j, a, lr As Long, key As Variant Dim Header As Range, Ws As Worksheet Set Header = Sheet1.Range("A1:H1") Set dic =...

Dùng hàm dateserial kết hơp mấy hàm mid, left,right gì đó tùy bạn

Kính gửi anh chị, Tiếp theo vấn đề dùng Dic trong excel, em có mày mò và làm code tách sheet như File. Nhưng giờ em muốn tách sheet và có thêm điều kiện lấy trong khoảng thời gian như tại cột K1 và K2. Tuy nhiên, cột A - ngày tháng nếu ở tình trạng như File thì không chạy được vì chỉ hiểu là...

Cảm ơn tất cả các anh chị em đan quan tâm xem code và chỉ giáo cho tôi những điều rất hữu ich. Như tôi đã viết. Code trên tôi làm dựa trên bài mẫu của anh NDU. Để cập nhật Dic khi sh Đon gia có biến động thì ở SH đon gia đã có code Private Sub Worksheet_Change(ByVal Target As Range) If Not...

Thêm một cách khác cho bạn.

Bạn tham khảo với cách dùng công thức.

Dùng thử code này xem sao. Sub ABC() Dim i&, j&, t&, k&, tong&, lr& Dim Arr(), KQ() With Sheets("data") lr = .Cells(Rows.Count, 1).End(xlUp).Row Arr = .Range("A1:D" & lr).Value tong = Application.Sum(.Range("D2:D" & lr)) End With ReDim KQ(1 To tong + 1, 1 To 3) k = 1 KQ(k, 1) = Arr(1, 1) KQ(k...

Bạn thử dùng code này nhé: Option Explicit Sub TachDuLieu() Dim sArr(), dArr(), I&, J&, K&, sU1&, sU2&, dU1&, dU2& With Sheets("Data") sArr = .Range("A2:D" & .Cells(Rows.Count, "A").End(xlUp).Row).Value sU1 = UBound(sArr, 1) sU2 = UBound(sArr, 2) dU1 =...

Anh/chị cho em hỏi mình có cách nào tách dữ liệu thành nhiều dòng dựa theo điều kiện. Vd: E có 1 bảng "data" vào như file đính kèm, tương ứng điều kiện của "number_subject", sẽ hiển thị kết quả tương ứng như sheet "result".

Thử chạy code xem có đúng ý không.

Mọi người ơi, giúp em với ạ, em muốn lọc dữ liệu ở cột "B", sheet "Tong Hop New" và cắt phần đã lọc rồi paste value sang file mới, file lưu tên theo điều kiện lọc. Điều kiện lọc nằm ở sheet "Tach File" ạ. P/s: em đã lọc được nhưng không biết làm sao để copy pastevalue sang file mới (không bao...

Dạ anh, Vậy giờ chúng ta sẽ loại bỏ cái khó thứ 2 : gộp ô Nữa là bỏ điều kiện nếu 1 mã bán có 2 mã KM cùng khu vực, sẽ tách ra 2 mã KM riêng ở 2 khu vực khác nhau. Ví dụ: mã 80110201170024 đang có tặng 2 mã KM cùng 1 khu vực, giờ tách ra 1 mã KM qua khu vực khác ( Tây Bắc). Em dẫn chứng theo...

Em co file excel, sheet 1 gõ mã đơn vị như cột màu hồng bên phải sẽ hiện ra số liệu của Đơn vị đó, hiện tại, em muốn thay vì gõ từng mã đơn vị thì em chỉ cần gõ khu vực và excel sẽ tự động tách ra nhiều sheet mỗi sheet có tên là mã đơn vị ạ. Các bác giúp em với ạ. Xin đa tạ

Luyện cửu âm chân kinh nên đi từ căn bản, luyện kiểu bạn dể trở thành Mai Siêu Phong thời @

- Vậy đã đến thức cuối cùng Cửu Âm Chân Kinh rồi, thức này có 2 chiêu: 1 là dùng Key nối chuỗi, 2 là ghi lại chỉ số dòng rồi gán vào mảng kết quả(chi tiết và data chuẩn file đính kèm, 2 Sub đều sử dụng lệnh Sort nên các bạn phải ở Sheets("Data" mới Run chạy Code nhé) - Và đã qua tháng Giêng, năm...

Em có 1 bảng công thức số liệu, em muốn tách ra từng sheet ví dụ từ 1 - 100, 101 - 150 vậy thì em dùng công thức gì ạ. Em cảm ơn các anh/chị nhiều ạ.

A. Code bài 21 là cách không chính thống lắm (hơi tà đạo và lợi dụng cấu trúc dữ liệu, không tổng quát): - Tìm dòng cuối bằng cách tìm * ByRow: Nếu dữ liệu rời rạc và/ khác sheet thì không dùng được - Chia 4 vì cứ mỗi bảng chiếm 4 cột, tổng cột x tổng dòng chia 4 = số dòng 1 cột (và là số dòng...