Bagaimana cara menyalin baris dari satu sheet ke sheet lain berdasarkan beberapa kriteria?

Saya perlu menyalin baris dari satu lembar ke lembar lain di Excel, berdasarkan beberapa kriteria. Jika pada Lembar 1 di beberapa sel baris di kolom H ada "X" Saya ingin kolom lubang itu untuk disalin pada Lembar 2. Dan saya ingin itu untuk semua baris di Lembar 1. Sekarang saya memiliki sekitar 130 baris di Lembar 1, tetapi akan memiliki lebih banyak di masa depan. Adakah yang bisa membantu saya? Terima kasih, Nenad

Kode berikut memfilter data column Hdengan menetapkan "X"kriteria. Hasil penyaringan disalin keSheet2

Sub CriteriaCopy()

    With ActiveSheet.Range("A:L")
         .AutoFilter Field:=8, Criteria1:="" & X & ""
    End With

    ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).Copy _
    Destination:=Worksheets("Sheet2").Range("A1")

End Sub