Extract 1, 2 or 3 words from middle of text in a cell

I have a list of banners (supermarkets) with categories in front and regions at the end. I only want the name of supermarkets.

for example:

RETAILER ALL SALES Tl Retailer National
RETAILER ALL SALES Dominion - Nfld Newfoundland
RETAILER ALL SALES Save Easy Newfoundland
RETAILER ALL SALES Maritimes Maritimes
RETAILER ALL SALES Atl Superstore Maritimes
RETAILER ALL SALES Atlantic SuperValu Maritimes
APPAREL Tl Retailer National
APPAREL Dominion - Nfld Newfoundland
APPAREL Save Easy Newfoundland
APPAREL Maritimes Maritimes
APPAREL Atl Superstore Maritimes
APPAREL Atlantic SuperValu Maritimes
BAKERY Tl Retailer National
BAKERY Dominion - Nfld Newfoundland
BAKERY Save Easy Newfoundland
BAKERY Maritimes Maritimes
BAKERY Atl Superstore Maritimes
BAKERY Atlantic SuperValu Maritimes
DELI Tl Retailer National
DELI Dominion - Nfld Newfoundland
DELI Save Easy Newfoundland
DELI Maritimes Maritimes
DELI Atl Superstore Maritimes
DELI Atlantic SuperValu Maritimes

I only want the names of supermarkets (highlighted in red). The list is a lot bigger than this and need to be updated weekly.

Is this doable?

Thanks for your help.

This might help.

http://www.ozgrid.com/VBA/extract-words-function.htm

EDIT: now you've properly explained your problem, that link probably won't help.

Thanks for your help. I followed the instruction, but didn't work. Don't know what I've done wrong.

Is there a way to set up a formula instead of VBA?

Hi NBVC,

Thanks for your help. But I don't really understand what you mean. If my whole list is in Col L, should I list out all stores in one column (i.e., Col M) and apply the formula in Col N or any col?

Hi NBVC,

Something strange. It works if I don't change anything. When I expand my store list to I1:I19, nothing shows up.

Can you please tell me why?

Thanks.

Hi NBVC,

There is no blanks in the range. But the last formula you provided works perfect.

Thanks a million!!