Estoy intentando crear un código que mira a través de un rango de celdas y copiaré y pegaré las celdas que cumplen con un parámetro específico en una ubicación diferente en el libro de trabajo.

Me gustaría copiar cualquier cosa con la letra L de "hoja 5" y copiar un rango específico a "hoja 1"

Debo haber fallado algo en la parte del código del bucle porque solo se está copiando la parte superior del rango de celdas. Me gustaría que el pegado comience en la fila 5 y continúe moviéndose hacia abajo. ¿Esto significa que puse correctamente el IRow = IRow + 1 debajo de la función de pegar?

Sub Paste_Value_Test()

Dim c As Range
Dim IRow As Long
Dim rDestination As Excel.Range

Application.ScreenUpdating = False
Sheets("sheet5").Activate
For Each c In Sheets("sheet5").Range("b2", Range("N65536").End(xlUp))
    If c.Value = "L" Then
        Sheets("sheet5").Cells(c.Row, 2).Copy

        Set rDestination = Worksheets("sheet5").Cells(5 + IRow, 12)

        rDestination.Select
        Selection.PasteSpecial Paste:=xlPasteValues, _
        Operation:=xlNone, _
        SkipBlanks:=False, _
        Transpose:=False

        IRow = IRow + 1

    End If
Next c

End Sub

Realmente aprecio cualquier ayuda en esto. Soy relativamente nuevo en VBA y voy a empezar a investigar seriamente.