Sub test()
ReDim tabres(0, 0)
For n = 6 To Range("F" & Rows.Count).End(xlUp).Row
x = Split(Range("F" & n))
ReDim tabres(0, UBound(x))
Range("H" & n).Resize(, UBound(x) + 1) = x
Next
End Sub
Merci pour ta réponse
il s'avère qu'excel permet de transposer chaque case en sélectionnant la colonne de départ, incluable dans une macro enregistrée donc. Ce qui me permet d'éviter de me casser la tête sur ce point