Modificar este código para que acepte solo 2 nombre y apellidos en una hoja de Excel

DANTE, realizo este código y me funciona bien pero modifique  mi forma de trabajar en el archivo de Excel, necesito que me acepte  no solo 1 nombre con su apellido como estaba programado el código, ahora necesito que me acepte  solo 2 nombres con apellidos en una misma hoja.

* Este código lo copio en; Worksheet_Change de la hoja.

* Se los paso el código:

Private Sub Worksheet_Change(ByVal Target As Range)

'Por.Dante Amor

    If Not Intersect(Target, Range("AC7")) Is Nothing Then

        [AC8] = ""

        [AE8] = ""

        buscar

    End If

    If Not Intersect(Target, Range("B:B")) Is Nothing Then

        cuantos = Application.CountIf(Range("B:B"), Cells(Target.Row, "B"))

        If cuantos > 1 Then

            MsgBox "Ya existe el nombre: " & Target, vbExclamation, "DUPLICADO"

            Application.EnableEvents = False

            Target = ""

            Target.Select

            Application.EnableEvents = True

        End If

    End If

End Sub