Bonjour ,

J'essaye de comprendre une macro developpée par une autre personne.
Seulement il a fait pas mal d'enregistrement de macro et c'est difficile de comprendre c'est le cas de cette partie de code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
If Cells.Find(What:="Quote", After:=ActiveCell, LookIn:= _
        xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
        xlNext, MatchCase:=False) Is Nothing Then
        Erreur = MsgBox("Manque QP", vbOKOnly)
        GoTo 100
Merci de votre aide