This is the code I am using:
Sub CHECK_FOR_DUPLICATES()
lastrow = Range("Q34").End(xlUp).Row
For X = lastrow To 1 Step -1
If Application.WorksheetFunction.CountIf(Range("L5:Q33" & X), Range("Q" & X).Text) > 1 Then
If Range("Q" & X).Value = "" Then
GoTo JUMP3
ElseIf Range("Q" & X).Value = "CONSOLE" Then
GoTo JUMP3
ElseIf Range("Q" & X).Value = "PHONE" Then
GoTo JUMP3
'Here is where I want it to goto jump3 if it is an Integer
Stop
GoTo JUMP3
End If
Range("Q" & X).Activate
MsgBox "IT APPEARS YOU HAVE 2 PEOPLE ON " & ActiveCell.Value
STOP_SUB = "YES"
Exit Sub
'Range("E" & x).Interior.ColorIndex = 4
JUMP3:
End If
Next X
End Sub