Doublons sur une ligne

GHISLAIN

XLDnaute Impliqué
Bonjour les exceliens,

Sur le forum je trouve des macro traitant les doublons sur une colonne .
Mais je ne parvient pas a trouver le traitement de doublons sur une ligne, avant de l'ajouter .

Merci a vous de tous de l'aide apporté et de vos suggestions
Bien amicalement **

Ghislain
 

Pièces jointes

  • Classeur2.xlsm
    16.3 KB · Affichages: 48

GHISLAIN

XLDnaute Impliqué
re j'ai trouvé un code qui me permet de ne pas ajouter la valeur dans le cas ou celle-ci existe

Dim c As Range

Set c = Sheets("Feuil1").Range("A1:iv1").Find(TextBox1, LookIn:=xlValues, lookat:=xlWhole)
If Not c Is Nothing Then


Set c = Nothing
Else


Range("IV" & ActiveCell.Row).End(xlToLeft).Offset(0, 1) = TextBox1
End If


si desfois cela interesse des personnes

bonne journee a tous

Ghislain
 

Statistiques des forums

Discussions
314 190
Messages
2 106 996
Membres
109 735
dernier inscrit
Mounskad