Nhờ sắp xếp và lọc dữ liệu

[hungndcbq1]

Em có cột k là đầy đủ danh sách 46 học sinh của một lớp, cột d có 39 học sinh đã làm bài kiểm nhưng lặp lại nhiều chỗ, cho e hỏi làm sao để biết là ở cột d thiếu học sinh nào? E cảm ơn ạ!

 

[Ba Tê]

Em có cột k là đầy đủ danh sách 46 học sinh của một lớp, cột d có 39 học sinh đã làm bài kiểm nhưng lặp lại nhiều chỗ, cho e hỏi làm sao để biết là ở cột d thiếu học sinh nào? E cảm ơn ạ!

Nhập công thức vào ô L6:

= COUNTIF($D$6:$D$166;K6)

Copy xuống đến dòng 51, kết quả nào =0 là thiếu tên HS đó.

 

[CHAOQUAY]

Em có cột k là đầy đủ danh sách 46 học sinh của một lớp, cột d có 39 học sinh đã làm bài kiểm nhưng lặp lại nhiều chỗ, cho e hỏi làm sao để biết là ở cột d thiếu học sinh nào? E cảm ơn ạ!

Nhập công thức, copy xuống dưới. Ô nào = 0 là còn thiếu

L6=COUNTIF($D$6:$D$166,K6)

 

[be_09]

Em có cột k là đầy đủ danh sách 46 học sinh của một lớp, cột d có 39 học sinh đã làm bài kiểm nhưng lặp lại nhiều chỗ, cho e hỏi làm sao để biết là ở cột d thiếu học sinh nào? E cảm ơn ạ!

Muốn tra cứu thì phải dựa vào Mã học sinh (vì nó là mã duy nhất), còn dựa vào họ tên học sinh nếu trùng họ tên thì kết quả sẽ không chính xác.

 

[hungndcbq1]

=COUNTIF($D$6:$D$166,K6)

hay quá, em cảm ơn ạ! Nếu e muốn bôi mầu đỏ và cho cỡ chữ to lên ở các ô có kết quả 0 thì làm như thế nào ạ?

Bài đã được tự động gộp: 23/3/20

Nhập công thức, copy xuống dưới. Ô nào = 0 là còn thiếu

L6=COUNTIF($D$6:$D$166,K6)

hay quá, em cảm ơn ạ! Nếu e muốn bôi mầu đỏ và cho cỡ chữ to lên ở các ô có kết quả 0 thì làm như thế nào ạ?

 

[huonglien1901]

hay quá, em cảm ơn ạ! Nếu e muốn bôi mầu đỏ và cho cỡ chữ to lên ở các ô có kết quả 0 thì làm như thế nào ạ?

Bài đã được tự động gộp: 23/3/20

hay quá, em cảm ơn ạ! Nếu e muốn bôi mầu đỏ và cho cỡ chữ to lên ở các ô có kết quả 0 thì làm như thế nào ạ?

Bạn sử dụng công thức này.

L6=COUNTIF($D$6:$D$166,K6)

Sau đó fill xuống dưới,
Khi dữ liệu đã có thì chạy thử code sau.

Private Sub Worksheet_Calculate()
    Dim xCell As Range
    For Each xCell In Range("L6:L51")
        With xCell
            If xCell.Value = 0 Then
                .Font.Name = "Time New Roman"
                .Font.Size = 28
                .Interior.Color =255
            Else
                .Font.Name = "Inherit"
                .Font.Size = 11
                .Interior.Color = xlNone
            End If
        End With
    Next
End Sub

 

[hungndcbq1]

Bạn sử dụng công thức này.

L6=COUNTIF($D$6:$D$166,K6)

Sau đó fill xuống dưới,
Khi dữ liệu đã có thì chạy thử code sau.

Private Sub Worksheet_Calculate()
    Dim xCell As Range
    For Each xCell In Range("L6:L51")
        With xCell
            If xCell.Value = 0 Then
                .Font.Name = "Time New Roman"
                .Font.Size = 28
                .Interior.Color =255
            Else
                .Font.Name = "Inherit"
                .Font.Size = 11
                .Interior.Color = xlNone
            End If
        End With
    Next
End Sub

tuyệt vời ạ, e xin cảm ơn ạ!

 

[hungndcbq1]

Bạn sử dụng công thức này.

L6=COUNTIF($D$6:$D$166,K6)

Sau đó fill xuống dưới,
Khi dữ liệu đã có thì chạy thử code sau.

Private Sub Worksheet_Calculate()
    Dim xCell As Range
    For Each xCell In Range("L6:L51")
        With xCell
            If xCell.Value = 0 Then
                .Font.Name = "Time New Roman"
                .Font.Size = 28
                .Interior.Color =255
            Else
                .Font.Name = "Inherit"
                .Font.Size = 11
                .Interior.Color = xlNone
            End If
        End With
    Next
End Sub

em chưa hiểu " Sau đó fill xuống dưới" là như thế nào ạ, xin được giải thích rõ hơn đc 0 ạ? e cảm ơn!

 

[huonglien1901]

em chưa hiểu " Sau đó fill xuống dưới" là như thế nào ạ, xin được giải thích rõ hơn đc 0 ạ? e cảm ơn!

Tại ô l6 bạn gõ công thức #8.
Sau đó bạn kéo công thức xuống dưới.
Nhấn alt+f11 cửa sổ hiện lên. Bạn nhấn F5 để chạy code.