Bonjour Victor 21 et Robert ,
je vous remercie tous les 2 d'avoir pris du temps pour regarder le fichier ,
En réalité , il n'y a pas de données dans la colonne H , c'est pour cette raison que j'ai réalisé la macro ci-dessous qui modifie le contenu de la colonne G en fonction de son contenu.
Merci'd'avance pour votre aide
Sub famille()
Range("G4").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Replace What:="CHIPS", Replacement:="Chips psa", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="PRODUITS APERITIFS", Replacement:="Chips psa", LookAt _
:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="DEVANTS DE CAISSE", Replacement:="Snacking ", LookAt _
:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="SNACKING", Replacement:="Snacking ", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Etc .........
End Sub
Pour info: Dans la colonne G à partir de G4 , je souhaite remplacer des désignations par d'autres , au départ tout se passe bien , mais ensuite , j'ai des mots qui viennent se rajouter
Ex: Dans la ligne 31143 ,après avoir exécuté la macro , j'ai dépannage ali frais qui est venu se rajouter.
Je remercie d'avance celui qui pourra m'aider .
Bonne journée
DAVID