Bonjour Sylvain37, le forum,
Tu sélectionnes ta colonne A
Tu cliques sur Données
Tu cliques sur Convertir
Tu coches Délimité puis suivant
Tu coches Virgule puis cliques sur Suivant
Cliques sur Terminer
Tu obtiens alors 6 colonnes distinctes.
https://forum.excel-pratique.com/viewtopic.php?f=2&t=53200
La même chose par macro....
Option Explicit
Sub Scinder()
Dim Tablo
Dim i As Integer
Dim lig As Long, derlig As Long
With ActiveSheet
derlig = .Range("A" & Rows.Count).End(xlUp).Row
.Range("A1:A" & derlig).Replace What:="""", Replacement:=""
For lig = 1 To derlig
Tablo = Split(.Range("A" & lig), ",")
For i = 0 To UBound(Tablo)
.Cells(lig, 1 + i) = Tablo(i)
Next i
Erase Tablo
Next lig
End With
End Sub
Cordialement,