Bonjour, j'essaye de faire un code qui dit que si il ne trouve pas l'élément en paramètre alors il doit le coller dans cette ligne sauf que je ne comprends pas ça ne marche juste pas.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
If .Worksheets("Feuil" & compteur).Cells(4, Columns.Count).Find(.ActiveSheet.Range("B" & b).Value) Is Nothing Then
                        .Worksheets("Feuil" & compteur).Cells(4, Columns.Count).End(xlToLeft).Offset(0, 1).Value = .ActiveSheet.Range("B" & b).Value
                        End If

b et compteur sont des entiers.