VBA: hvordan vælger man bestemte celler i VBA?

Sub test()

'Gennemløber Ark2 B1:B20
For Each c In Worksheets("Ark2").Range("B1:B20").Cells
    'Tjekker om cellen er "Tom"
    If IsEmpty(c.Value) Then
        'Finder sidste tomme række på Ark3 i kolonne A
        SidsteRække = Worksheets("Ark3").Range("A" & Rows.Count).End(xlUp).Row + 1
        'Kopierer celler i rækken ( B -1 og B +2 alså A:D i rækken)
        Worksheets("Ark2").Range(c.Offset(0, -1), c.Offset(0, 2)).Copy _
        Destination:=Worksheets("Ark3").Range("A" & SidsteRække)
        'Og indsætter på Ark3 i første tomme række
         
    End If

Next c
End Sub