Delete Row If Cell Is Empty

I have the below code :

Private Sub worksheet_change(ByVal target As Range)
Application.EnableEvents = False

finalrow = Cells(65536, 2).End(xlUp).Row
For i = 5 To finalrow
If Cells(i, 2).Value = "1" Then
Range("C3:J3").copy
Cells(i, 3).Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End If
Next i

Application.EnableEvents = True
Application.CutCopyMode = False
End Sub

It baiscally copies row C3:J3 and pastes it in the row range "C:J" depending on where "1" is placed in column B. Code works fine, I want to add another loop in the code which deletes the entire row if the cells in column "B" do not equal "1".