Nhờ hướng dẫn Lọc dữ liệu và Trích xuất thành các sheet/file mới

[XiangGang]

Thưa các anh/chị
Tôi rất mong được các anh, chị giúp việc này. Tôi không rành excel lắm nên đành nhờ cậy lên đây. Cảm ơn các anh chị.
File đính kèm có nhiều cột, dòng. Cần lọc theo các ô ở Cột, sau khi lọc thì trích xuất kết qua sang 1 sheet mới. Trên file đính kèm có ví dụ mẫu tôi làm.
Nhờ các anh chị hướng dẫn giúp tôi cách làm bằng công thức, hàm tính toán nào. Hoặc viết một đoạn code bằng VBA để chạy.
Trân trọng cảm ơn.

 

[Hoàng Tuấn 868]

Thưa các anh/chị
Tôi rất mong được các anh, chị giúp việc này. Tôi không rành excel lắm nên đành nhờ cậy lên đây. Cảm ơn các anh chị.
File đính kèm có nhiều cột, dòng. Cần lọc theo các ô ở Cột, sau khi lọc thì trích xuất kết qua sang 1 sheet mới. Trên file đính kèm có ví dụ mẫu tôi làm.
Nhờ các anh chị hướng dẫn giúp tôi cách làm bằng công thức, hàm tính toán nào. Hoặc viết một đoạn code bằng VBA để chạy.
Trân trọng cảm ơn.

Bạn chạy thử xem sao.

 

[SA_DQ]

Mình cũng có 1 con macro sự kiện nè, xin mời tham khảo

Private Sub Worksheet_Activate()
 Const GPE As String = "CT" 'Trang Tên Là "CT"    '
 Dim Arr()
 Dim Rws As Long, J As Long, W As Integer, Col As Integer
 
 With Sheets("DSNV")
    Rws = .UsedRange.Rows.Count
    ReDim aKQ(1 To Rws, 1 To 7)
    [A2].Resize(Rws, 7).Value = aKQ()
    Arr() = .[A1].Resize(Rws, 7).Value
    For J = 1 To UBound(Arr())
        If Arr(J, 3) = GPE Then
            W = W + 1
            For Col = 1 To 7
                aKQ(W, Col) = Arr(J, Col)
            Next Col
        End If
    Next J
    MsgBox W
 End With
 [A2].Resize(W, 7).Value = aKQ()
End Sub

 

[XiangGang]

Bạn chạy thử xem sao.

Chào bạn Hoàng Tuấn 868,
Tôi đã làm được theo file hướng dẫn của bạn. Cảm ơn bạn rất nhiều.
Nhờ có bạn mà tôi có thể làm việc nhanh hơn.

 

[VetMini]

Cái này Excel có công cụ đàng hoàng. Tại sao lại muốn "bấm một phát"? Lười quen rồi?
Tác giả bài #2 và #3: Excel có công cụ Advanced Filter để làm công việc này.

 

[SA_DQ]

. . . .
Tác giả bài #2 và #3: Excel có công cụ Advanced Filter để làm công việc này.

Macro sự kiện thì có cần bấm 1 phát hay thao tác lọc liết gì đâu? Đầu tư 1 lần xài suốt 'Đời' kể cũng đáng kia mà! !




CHÚC MỌI NGƯỜI VUI VẺ SUỐT TUẦN!

 

[VetMini]

Macro sự kiện thì có cần bấm 1 phát hay thao tác lọc liết gì đâu? Đầu tư 1 lần xài suốt 'Đời' kể cũng đáng kia mà! !


...

Không đúng. Đầu tư này là nhờ vả người khác chứ có phải do khả năng mình đâu mà gọi là xứng đáng. Ba bữa cần lọc thêm thì lại phải nhờ tiếp.

Chịu khó học công cụ của Excel mới xứng đáng gọi là đầu tư (phát triển kỹ năng).

 

[nguyenhung1981]

dùng hàm filter là ra luôn mà

 

[Hoàng Tuấn 868]

dùng hàm filter là ra luôn mà

Bạn làm vào file đi để anh em học hỏi với. Mình dùng Excel đời thấp nên không có hàm filter để thử.

 

[SA_DQ]

Bạn làm vào file đi để anh em học hỏi với. Mình dùng Excel đời thấp nên không có hàm filter để thử.

Viết hàm mảng tự tạo & . . . .
Sẽ làm xấu trang tính, nhưng cũng tạm chấp nhận cho "người nghèo" hay xài của chùa!

Vui nha các bác!

 

[thien-16]

Thưa các anh/chị
Tôi rất mong được các anh, chị giúp việc này. Tôi không rành excel lắm nên đành nhờ cậy lên đây. Cảm ơn các anh chị.
File đính kèm có nhiều cột, dòng. Cần lọc theo các ô ở Cột, sau khi lọc thì trích xuất kết qua sang 1 sheet mới. Trên file đính kèm có ví dụ mẫu tôi làm.
Nhờ các anh chị hướng dẫn giúp tôi cách làm bằng công thức, hàm tính toán nào. Hoặc viết một đoạn code bằng VBA để chạy.
Trân trọng cảm ơn.

Mình gửi lại file nha

 

[Hoàng Tuấn 868]

Mình gửi lại file nha

Sao code không chạy được, sheet nguồn không có nội dung mà cũng tách sang sheet khác được, có bí quyết gì hay vậy bạn ơi.

 

[thien-16]

Sao code không chạy được, sheet nguồn không có nội dung mà cũng tách sang sheet khác được, có bí quyết gì hay vậy bạn ơi.
View attachment 302579
View attachment 302580

Mình gửi lại bạn xem thử nha

 

[Hoàng Tuấn 868]

Mình gửi lại bạn xem thử nha

Như thế này thì mỗi lần thay đổi loại Tình trạng công việc thì lại phải chỉnh code nhỉ.

 

[SA_DQ]

Các bạn có thể tham khảo cách tạo hàm mảng tự tạo trong file