Re : Supprimer les mots suivant une virgule dans cellule
Bonsoir ERIC,
Sur la base de ton texte, j'ai simplement enregistré une macro.. ce qui donne ceci :
Sub Macro1()
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
Semicolon:=False, Comma:=True, Space:=False, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 9), Array(3, 9))
End Sub
Fait par Données/Convertir choix Délimité et suivant (après selection de la plage)
Selection de la virgule en séparateur et suivant
Selection de la première colonne à supprimer (et ensuite de la seconde) en cochant, à chaque fois, Colonne non distribuée.
et Terminé.
A adapter à ton cas.
Bonne soirée.
Jean-Pierre