Làm thế nào để lọc ra được những dòng dữ liệu bị trùng lắp giữa 2 sheet

  • Thread starter Thread starter ckc2006
  • Ngày gửi Ngày gửi
Liên hệ QC

ckc2006

Thành viên mới
Tham gia
24/10/08
Bài viết
41
Được thích
16
Em có một bảng tính cần xử lý nay nhờ anh em giúp dùm...thank
1) ở sheet 1 em muốn lọc ra những dòng dữ liệu bị trùng lắp với điều kiện là cột B và C
ví dụ : B4,C4=B5,C5
2) ở sheet 1 em muốn đếm số lượng dòng với điều kiện cột C không được trùng với nhau.
3) ở sheet 2 nếu có một dòng nào đó mà dữ liệu ở dòng đó trùng với một dòng ở sheet 1 (lưu ý là dữ liệu ở dòng đó phải trùng tất cả các cột) khi đó tại sheet 1 cột G sẽ tự động nhập vào từ "trả rổi", dữ liệu em nhập vào từ sheet 2

các anh em có thể chỉ mình cách nào cũng được vì hiện nay mình đang làm thủ công nên mất thời gian quá....thank
có file đính kèm.
 

File đính kèm

Em có một bảng tính cần xử lý nay nhờ anh em giúp dùm...thank
1) ở sheet 1 em muốn lọc ra những dòng dữ liệu bị trùng lắp với điều kiện là cột B và C
ví dụ : B4,C4=B5,C5
2) ở sheet 1 em muốn đếm số lượng dòng với điều kiện cột C không được trùng với nhau.


các anh em có thể chỉ mình cách nào cũng được vì hiện nay mình đang làm thủ công nên mất thời gian quá....thank
có file đính kèm.

Bạn kiểm tra lại xem (Nếu làm thủ công) những dòng mình tô màu xanh

  1. Cần giữ lại, hay xoá bỏ
  2. Nếu không phải thì theo bạn giữ lại, hay xoá bỏ những dòng nào
 

File đính kèm

Trả lời câu 1, nhưng chưa chắc đúng í bạn!

PHP:
Option Explicit
Sub LocTrung()
 Dim lRs As Long, Ww As Long
 Dim iColor As Byte
 
 Sheets("Sheet 1").Select:   Columns("A:J").Select
 Application.ScreenUpdating = False
  
1 Selection.Sort Key1:=Range("B2"), Order1:=xlAscending, Key2:=Range("C2") _
    , Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1
 lRs = [b65500].End(xlUp).Row - 1:              iColor = 33
 For Ww = 2 To lRs
    With Cells(Ww, "B")
        If .Value = .Offset(1) And .Offset(, 1) = .Offset(1, 1) Then
            iColor = iColor + 1
            If iColor > 41 Then iColor = 34
            .Offset().Resize(2).Interior.ColorIndex = iColor
        End If
    End With
 Next Ww
End Sub
Nếu cần xếp lại dữ liệu như cũ thì tham khảo dòng lệnh đã ghi số để viết thêm 1 macro khác. Hay đơn giản, dùng lệnh trong thanh menu lập lại trật tự từ trước.
 
hihihi...đầu tiên xin cám ơn 2 bạn boyxin và bạn chanhTQ@ nhiều
- ý mình muốn là đối với câu hỏi đầu tiên khi mình nhập từ bàn phím hoặc copy từ một file khác sang sheet 1 nếu dữ liệu mới nhập vào trùng với những dữ liệu đã có ở dòng trên thì tự động cảnh báo cho người sử dụng biết chứ không xóa bỏ. và làm sao để biết được những dữ liệu đã nhập trước đó có trùng nhau hay không, vì sheet này đã nhập khá dài nếu kiểm tra thủ công thì lâu quá....
- Mình cũng không rành về macro và các hàm chuyên sâu cho lắm nên nhờ các bạn chỉ rõ dùm.
- Mình cũng mới bắt đầu tìm hiểu về excel nâng cao để phục vụ cho công việc nhưng mình cũng không biết phải bắt đầu từ đâu, mình phải đọc tài liệu gì ? nếu trên diễn đàn này có thì phải tìm ở đâu, nếu các bạn biết rất mong các bạn hướng dẫn dùm, vì nếu mình hỏi và các bạn trả lời mà mình thì chẳng biết gì về nó thì cũng khó lòng tiếp cận được và hiểu được.
.....thân

1) ở sheet 1 em muốn lọc ra những dòng dữ liệu bị trùng lắp với điều kiện là cột B và C
ví dụ : B4,C4=B5,C5
 
Lần chỉnh sửa cuối:
Tô màu và Lọc trùng theo Cột

hihihi...đầu tiên xin cám ơn 2 bạn boyxin và bạn chanhTQ@ nhiều
- ý mình muốn là đối với câu hỏi đầu tiên khi mình nhập từ bàn phím hoặc copy từ một file khác sang sheet 1 nếu dữ liệu mới nhập vào trùng với những dữ liệu đã có ở dòng trên thì tự động cảnh báo cho người sử dụng biết chứ không xóa bỏ. và làm sao để biết được những dữ liệu đã nhập trước đó có trùng nhau hay không, vì sheet này đã nhập khá dài nếu kiểm tra thủ công thì lâu quá....
- Mình cũng không rành về macro và các hàm chuyên sâu cho lắm nên nhờ các bạn chỉ rõ dùm.
- Mình cũng mới bắt đầu tìm hiểu về excel nâng cao để phục vụ cho công việc nhưng mình cũng không biết phải bắt đầu từ đâu, mình phải đọc tài liệu gì ? nếu trên diễn đàn này có thì phải tìm ở đâu, nếu các bạn biết rất mong các bạn hướng dẫn dùm, vì nếu mình hỏi và các bạn trả lời mà mình thì chẳng biết gì về nó thì cũng khó lòng tiếp cận được và hiểu được.
.....thân

1) ở sheet 1 em muốn lọc ra những dòng dữ liệu bị trùng lắp với điều kiện là cột B và C
ví dụ : B4,C4=B5,C5

Nếu vậy thì bạn xem giải pháp thế này được chưa?
code hơi củ chuối rung rung giật giật​
 

File đính kèm

Lần chỉnh sửa cuối:
Giải pháp của bạn quá tốt luôn....nhưng bây giờ mình muốn áp dụng vào file của mình thì mình phải làm thế nào? file của mình up lên chỉ là một phần của flie gốc thôi.....
thank.....

cho mình hỏi thêm button AutoFilterMode = False có phải dùng để trả về giá trị ban đầu khi chưa lọc không?
 
Lần chỉnh sửa cuối:
Giải pháp của bạn quá tốt luôn....nhưng bây giờ mình muốn áp dụng vào file của mình thì mình phải làm thế nào? file của mình up lên chỉ là một phần của flie gốc thôi.....
thank.....

cho mình hỏi thêm button AutoFilterMode = False có phải dùng để trả về giá trị ban đầu khi chưa lọc không?

Thì bạn đã có sheet1 rồi, tạo thêm sheet mới, nhập phần cần thiết mà file của bạn cần có là OK chứ gì

Hoặc bạn đưa mẫu file của bạn lên thì mới có thể nói tiếp được
 
Web KT

Bài viết mới nhất

Back
Top Bottom