Nhờ mọi người đánh dấu những số trùng nhau giữa 2 danh sách.

[bookseo007]

Dựa vào cột SỐ thửa theo SH_BD trên sheet Dadangky so vớicột SỐ thửa theo SH_BD trên sheet Tong đánhdấu cột G của sheet tổng những trường hợp nào đã có bên sheet Dadangky là: "đã đăng ký"

View more random threads:

• Help me !!!!!! Ham excel
• Giải bài tập excel
• Anh em giúp em Hàm Index kết hợp match và isna!!
• Tinh ton kho theo han su dung
• Tìm nguyên nhân sai số giữa hàm Round trong vba và hàm Round khi dùng công thức
• Hàm vnd hiểu nhầm số lẻ!
• Giúp làm file PDF
• nhờ mọi người hướng dẫn làm giúp bài excel
• Link dữ liệu giữa các sheet
• lọc danh sách với 2 điều kiện

[phamhuanmko]

Mọi người giúp mình vơi !

[vivaclinic]

Dựa vào cột SỐ thửa theo SH_BD trên sheet Dadangky so vớicột SỐ thửa theo SH_BD trên sheet Tong đánhdấu cột G của sheet tổng những trường hợp nào đã có bên sheet Dadangky là: "đã đăng ký"

G2 sheet Tong:

=SUMPRODUCT((Dadangky!$A$2:$A$1712=$A2)*(Dadangky!$B$2:$B$1712=$B2))  

0 là không có, 1 là đã có, >1 là bị trùng nhiều lần,.......... tuỳ chỉnh.
Hơn 1000 dòng là oải như Rùa (Excel 2003)
Nếu >= Excel 2007 có thể dùng COUNTIFS().
Nhiều hơn nữa nên xài VBA.

[ungbuouhungviet01]

Ngoài cách dùng hàm a Ba Tê có thể viết code giúp em được không ? Do máy em cấu hình thấp chỉ dùng excell 2003 thôi mà dữ liệu thì nhiều mỗi lần chạy cứ đúng máy liên tục ak. hjx

[vytieubao]

Ngoài cách dùng hàm a Ba Tê có thể viết code giúp em được không ? Do máy em cấu hình thấp chỉ dùng excell 2003 thôi mà dữ liệu thì nhiều mỗi lần chạy cứ đúng máy liên tục ak. hjx

Liên quan đến việc KIỂM TRA SỰ TỒN TẠI của 1 phần tử trong tập hợp, thường người ta sẽ dùng Dictionary để xử lý
Đây chỉ là bài toán cơ bản ---> Xoẹt cái ra ngay
Ẹc... Ẹc...

[huahien]

Ngoài cách dùng hàm a Ba Tê có thể viết code giúp em được không ? Do máy em cấu hình thấp chỉ dùng excell 2003 thôi mà dữ liệu thì nhiều mỗi lần chạy cứ đúng máy liên tục ak. hjx

Theo lời ndu96081631... thì bạn chạy thử code này:

Public Sub GPE()Dim Dic As Object, Tem As String, sArr(), dArr(), I As LongSet Dic = CreateObject("Scripting.Dictionary")sArr = Sheets("Dadangky").Range(Sheets("Dadangky").[A2], Sheets("Dadangky").[B65536].End(xlUp)).ValueFor I = 1 To UBound(sArr, 1)    Tem = sArr(I, 1) & "#" & sArr(I, 2)    If Not Dic.Exists(Tem) Then Dic.Add Tem, EmptyNext IWith Sheets("Tong")    sArr = .Range(.[A2], .[B65536].End(xlUp)).Value    ReDim dArr(1 To UBound(sArr, 1), 1 To 1)    For I = 1 To UBound(sArr, 1)        Tem = sArr(I, 1) & "#" & sArr(I, 2)        If Not Dic.Exists(Tem) Then dArr(I, 1) = "Chua DK"    Next I    .[G2].Resize(I - 1) = dArrEnd WithSet Dic = NothingEnd Sub