Importing .txt into numbers causes extra unwanted rows solution?

Question

I have a text document that imports into numbers like this:
Name Age Eyes Likes
A B C D
1 Jack 4 Brown Cartoons
2 Playing
3 Laughing
4 Jill 7 Blue Dancing
as you can see, Playing and Laughing are in separate rows. what can i do to the .txt file to make my numbers spreadsheet look like this:
Name Age Eyes Likes
A B C D
1 Jack 4 Brown Cartoons, Playing, Laughing
2 Jill 7 Blue Dancing
thanks in advance.

Answer 1

Run this cript:
--=====
property nb : 3 (* count of fields in a record *)
property liste : {}
--=====
on run
set theFile to choose file "Select the text file" of type {"public.plain-text"}
my nettoie()
set tt to (read theFile)
set tt to my remplace(tt, quote, "")
set tt to my remplace(tt, "; ", "")
set tt to paragraphs of tt
set nbFields to count of tt
set nbRows to nbFields div nb
if (nbRows * nb) < nbFields then set nbRows to nbRows + 1
repeat with i from 1 to nbRows
set itm to item (1 + (i - 1) * nb) of tt
try
repeat with j from 2 to nb
set itm to itm & ", " & item (j + (i - 1) * nb) of tt
end repeat
end try
copy itm to end of my liste
end repeat
set tt to my recolle(my liste, return)
set the clipboard to tt
my nettoie()
end run
--=====
on nettoie()
set my liste to {}
end nettoie
--=====
on recolle(l, d)
local t
set AppleScript's text item delimiters to d
set t to l as text
set AppleScript's text item delimiters to ""
return t
end recolle
--=====
on remplace(t, d1, d2)
local l
set AppleScript's text item delimiters to d1
set l to text items of t
set AppleScript's text item delimiters to d2
set t to l as text
set AppleScript's text item delimiters to ""
return t
end remplace
--=====
Then paste the clipboard in a table of Numbers.
Yvan KOENIG (from FRANCE mercredi 11 février 2009 21:12:32)