Message d'avertissement si doublon colonne

Bonjour à tous,

J'aimerais insérer un message d'avertissement en cas de saisie d'un doublon.

J'ai en effet un premier code qui demande de saisir des données dans une ligne d'un tableau, puis à chaque mise à jour du classeur, une nouvelle saisie sera demandée et donc une nouvelle ligne créée dans ce meme tableau.

La valeur qui m'intéresse est celle située en colonne E. Il faudrait ainsi avertir l'utilisateur en cas de saisie d'un doublon dans l'InputBox.

Voici le code initial :

Dim rev As String

'Saisie de la revision

rev = Application.InputBox("Saisissez la révision", "Saisie de la révision", Type:=2)

If rev = "Faux" Or rev = "" Then Exit Sub

If UCase(rev) = "*" Then

ligne = Range("A100").End(xlUp).Row + 1

If ligne = 100 Then

MsgBox "Tableau complet pour indices"

Exit Sub

Exit Sub

End If

Else

ligne = Range("A100").End(xlUp).Row + 1

If ligne = 100 Then

MsgBox "Tableau complet pour autre"

Exit Sub

End If

End If

Range("E" & ligne) = rev

'Saisie du prénom

Range("A" & ligne) = InputBox("Saisissez votre prénom", "Saisie du prénom")

'Saisie du nom

Range("B" & ligne) = InputBox("Saisissez votre nom", "Saisie du nom")

'Saisie de l'objet

Range("C" & ligne) = InputBox("Saisissez l'objet de la modification", "Saisie de l'objet")

'Saisie de la date de modification

Range("D" & ligne) = InputBox("Saisissez la date de modification du fichier", "Date de modification")

End Sub

Je sais pas si c'est ça peut paraitre clair, Merci par avance pour votre aide!