Nhờ anh chị giúp em công thức lọc trùng tên trong các sheet (1 người xem)

  • Thread starter Thread starter cobeoi
  • Ngày gửi Ngày gửi

Người dùng đang xem chủ đề này

cobeoi

Thành viên mới
Tham gia
29/7/09
Bài viết
24
Được thích
1
em đang làm quyết toán thuế TNCN, để mò theo thủ công thì rất lâu. Em nhờ nah chị trong diễn đàn giúp em lọc trùng tên của 12 tháng qua 12 sheet. Em cám ơn rất nhiều ah
 

File đính kèm

em đang làm quyết toán thuế TNCN, để mò theo thủ công thì rất lâu. Em nhờ nah chị trong diễn đàn giúp em lọc trùng tên của 12 tháng qua 12 sheet. Em cám ơn rất nhiều ah
Minh lấy giúp thôi nhé, cách làm thì bạn tìm hiểu dần
PHP:
Sub Tim()
Dim WS As Worksheet, Sarr, Arr(1 To 65000, 1 To 1), i As Long, k As Long
Dim Dic As Object
Set Dic = CreateObject("Scripting.Dictionary")
For Each WS In Worksheets
    If WS.Name <> "TH" Then
        Sarr = WS.Range("B6", WS.[B65000].End(xlUp)).Resize(, 1).Value2
            For i = 1 To UBound(Sarr, 1)
                If Not Dic.exists(Sarr(i, 1)) Then
                    k = k + 1
                    Dic.Add Sarr(i, 1), k
                    Arr(k, 1) = Sarr(i, 1)
                End If
            Next
    End If
Next
With Sheets("TH")
    .[A1:A65000].ClearContents
    .[A1].Resize(k, 1).Value = Arr
End With
Set Dic = Nothing
End Sub
File đính kèm là ds ok rồi bạn nhé, còn lưu ý Lê Thị Là viết khác nhau (trong file của bạn ). Để sau làm cho dễ lọc trùng nên có mã nv bạn ah, ví dụ NV001 thì sau tìm mới dễ. Nếu muốn dùng code trên đổi sheet4 thành TH
 

File đính kèm

Lần chỉnh sửa cuối:
em hỏi ngu tý muốn tính tổng thuế tncn các tháng thi nên dùng công thức gì ah
Ví dụ cột thuế nó ko cố định tại một cột mà linh tính tại mỗi sheet thì dùng công thức tính tổng như thế nào cho chính xác
 
em hỏi ngu tý muốn tính tổng thuế tncn các tháng thi nên dùng công thức gì ah
Ví dụ cột thuế nó ko cố định tại một cột mà linh tính tại mỗi sheet thì dùng công thức tính tổng như thế nào cho chính xác
Thì làm công thức sum như bình thường. Cộng từng ô thuế tại mỗi sheet lại
 
Chào bạn cobeoi,

Trường hợp của bạn mình thấy không cần dùng đến hàm VBA phức tạp, bạn chỉ cần Copy tên nhân viên từ 12 Sheet của 12 tháng, Paste vào một cột, rồi dùng chức năng Remove Duplicates (vào Menu DATA > Remove Duplicates) của Excel để loại bỏ đi các tên bị trùng là được. Vừa nhanh, vừa chính xác. :)

Mình đã lọc thử giúp bạn bên dưới, tổng cộng có 96 người nhé! :D
 

File đính kèm

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

Back
Top Bottom