Sample to run both pieces:

```
Private Sub Worksheet_Change(ByVal Target As Range)
' Check Condition 1
If Target.Count = 1 Then
'only one cell updated
If Target.Column = 2 Then
'update is column B , our monitor target
Target.offset(0, -1).value = Target.offset(0, 1).value
Target.value = 0
End If
End If
' Check Condition 2
If Not Intersect(Target, Me.Range("Z:Z")) Is Nothing Then
Select Case Range("AB" & Target.row).value
Case Is = ""
Range("M" & Target.row) = Range("M" & Target.row).value + 1
Case Is = "1"
Range("N" & Target.row) = ""
End Select
End If
End Sub
```

Sample to run if only first is used (notice the Else If line that only is checked if the first If is false)

```
Private Sub Worksheet_Change(ByVal Target As Range)
' Check Condition 1
If Target.Count = 1 Then
'only one cell updated
If Target.Column = 2 Then
'update is column B , our monitor target
Target.offset(0, -1).value = Target.offset(0, 1).value
Target.value = 0
End If
ElseIf Not Intersect(Target, Me.Range("Z:Z")) Is Nothing Then
' Check Condition 2
Select Case Range("AB" & Target.row).value
Case Is = ""
Range("M" & Target.row) = Range("M" & Target.row).value + 1
Case Is = "1"
Range("N" & Target.row) = ""
End Select
End If
End Sub
```