Macro to merge columns A,B,C,D,E into 1 column

I need to make 2 lists as new sheets: a 'P' and a 'M' list, categorized by P or M in column 'I'. Pretty much I need to macro to go from this:

A B C D E DESCRIPTION QTY P/M SHRINK
G03A8 MAIN 1 M 0%
G03S2 LS 1 M 0%
G03S1 BASKET 1 M
G03C078 BASKET PD 1 P
G03C079 BASKET MD 1 M
(Table 1)

to:


M LIST DESCRIPTION QTY P/M SHRINK
G03A8 MAIN 1 M 5%
G03S2 LS 1 M 10%
G03S1 BASKET 1 M 15%
G03C079 BASKET MD 1 M 25%
(Table 2)
and


P LIST DESCRIPTION QTY P/M SHRINK
G03C078 BASKET PD 1 P 20%
(Table 3)


So Table 1 will be on Sheet 1, and I'd like Sheet 2 to have list 'M', and Sheet 3 to be have list 'P'

No thats not what I want. I want them lined up in the same rows, but all in one column because then i want to consolidate like numbers, and then split the data into two tables: P and M

hi,weeman297, can you post sample workbook showing your original data and result you need to obtain?