ok, lets say your list starts in cell A2 and goes down, I will give you three formula for cells B2,C2, & D2, that you need to enter then fill down. I am assuming that the format is always the same, as in your list, and always has all components shown, including the terminating full-stop.
cell B2...
=LEFT(A2,FIND(",",A2)-1)
cell C2...
=MID(A2,FIND(",",A2)+2,LEN(A2)-(FIND(",",A2)+4))
cell D2...
=LEFT(RIGHT(A2,2),1)
cell B2...
=LEFT(A2,FIND(",",A2)-1)
cell C2...
=MID(A2,FIND(",",A2)+2,LEN(A2)-(FIND(",",A2)+4))
cell D2...
=LEFT(RIGHT(A2,2),1)