Excel 2007 : Sorting by specific data with cells

**chris108** · 09-28-2010, 03:03 PM

Hi,
I need to sort some data based on certain words with each cell. For ex)

INCOME ON 1,129 POTLATCH DIV RATE
INCOME ON 2,073 TOWER GRP
INCOME ON 2,136 ADIMISTAFF INC DIV
INCOME ON 15 POTLATCH DIV
INCOME ON 6 TOWER GRP DIV

I would like the following output:
INCOME ON 1,129 POTLATCH DIV RATE
INCOME ON 15 POTLATCH DIV
INCOME ON 2,073 TOWER GRP
INCOME ON 6 TOWER GRP DIV
INCOME ON 2,136 ADIMISTAFF INC DIV

So in other words, all the cells that contain "POTLATCH" are together, cells with "TOWER" are together, etc. (regardless of the rest of the details in that corresponding cell).

Is this possible to do. It's currently being done manually and it takes too long.
Thank you so much for your help.
C

**JBeaucaire** · 09-28-2010, 06:41 PM

Assuming
1) those text strings are in column A starting at A1
2) column AA is empty
3) the word to sort by is always the word after the third space in the text string

...this macro will do what you want:

Please Login or Register  to view this content.

How/Where to install the macro:

1. Open up your workbook
2. Get into VB Editor (Press Alt+F11)
3. Insert a new module (Insert > Module)
4. Copy and Paste in your code (given above)
5. Get out of VBA (Press Alt+Q)
6. Save as a macro-enabled workbook

The macro is installed and ready to use. Press Alt-F8 and select it from the macro list.