code to work for odd rows only

If it's helpful here is the whole code

Sub PO_Not_Placed()
Application.EnableEvents = False
Dim ws1 As Worksheet: Set ws1 = Sheets("Report Center")
Dim RC_LR As Long
Dim PO_LR As Long
Dim rCell As Long
Sheets("Report Center").Select
  With Sheets("Pending Orders")
     For rCell = 5 To .Range("A" & Rows.Count).End(xlUp).Row
               If .Range("A" & rCell) <> "" And .Range("L" & rCell) = "" Then 'I WOULD LIKE FOR THIS ARGUMENT TO WORK ONLY FOR ODD ROWS
                       With Union(.Range("A" & rCell), .Range("C" & rCell))
                        .Copy
                           ws1.Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlFormats
                           ws1.Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlValues
                           ActiveSheet.Paste
                               Application.CutCopyMode = False
With Sheets("Report Center").Range("A:AO")
.FormatConditions.Delete
End With
                       End With
               End If
     Next rCell
  End With
Application.EnableEvents = True
End Sub