Comparer valeurs dans une cellule et dans un listbox

Bonjour,

Je sollicite votre aide, je suis désespéré, je ne parviens pas à trouver un sujet similaire dans les autres topics.

J'aurai besoin de savoir s'il est possible de comparer les valeurs d'une cellule avec celle présente dans une liste, afin de supprimer la ligne correspondante à cette cellule. (pour retour d'un document dans un prjet bibliothèque que je dois réaliser).

j'en suis arriver à ceci (qui est faux) :

Private Sub valide_Click()

Application.ScreenUpdating = False

i = 2

While Feuil3.Cells(i, 1) <> Empty

i = i + 1

Wend

If Feuil3.Cells(i, 1) = Mid(retourl, 1, InStr(1, retourl, " ; ")) Then

feuil3.cells(i,1).clear

feuil3.cells(i,2).clear

feuil3.cells(i,3).clear

feuil3.cells(i,4).clear

End If

End Sub

merci beaucoup!

bonne journée.

Bonjour

Mets ton fichier en ligne sans données confidentielles, ce sera plus facile de te tonner une solution

Amicalement

Merci,

Je suis en train de créer un logiciel de gestion de bibliothèque, le soucis se trouve dans l'userform5.

merci encore.

re,

Ok pour l'USF5 mais comment tu charges cette userform et on mets quoi dans les rubriques ???

Comment tu fonctionnes ?

Un peu d'explication aiderait