You could do that in two ways, either split the line into an array or replace each , with a linefeed.
Code:
YourArray=Split(Yourstring,",")
'or
YourString=Replace(Yourstring,",",vbcrlf)
Use line input to input the line from the file
Code:
Open file for input as #1
Line input #1,Yourstring
close #1