Hi.
The cell A1 contains:
Here's the shopping list: pig, dog, hamburger, chocolate..., beef. Please
purchase all of them. Thanks!

I would like to extract each item separately to different cells, ie
B1:
=Display1stItem
B2:
=Display2ndItem
....
B?:
=DisplayLastItem + CropText ". Please purchase all of them. Thanks!"

Reminder:
There are different contents with different item list.
Plus the wording of the contents and items are subject to change.
So something like: MID(A1, 24, 5) is not preferred.

Probably they can figure out which word to extract by pattern.
In my case, when the list starts, it must start with colon (:).
For each item, comma (,) is used to separate each of them.

So it would be if a function manages to work like the following:
.... ...: pig, cow, button. ...

.... Read (:). the extracting starts --
Read pig -- Read (,) -- the item is extracted.
Read cow -- Read (,) -- the item is extracted.
Read button -- Read (.) -- the item is extracted, and stop reading after that
fullstop(.)

How to do?

--
Additional information:
- I'm using Office XP
- I'm using Windows XP