新手求助帖----additem

ADDED: E32_5
ADDED: G7A_34 KEPT: E32_5
ADDED: G7A_13 KEPT: E32_5, G7A_34
ADDED: E32_18 KEPT: E32_5, G7A_13, G7A_34
ADDED: G7A_4 KEPT: E32_18, E32_5, G7A_13, G7A_34
ADDED: E32_1, G7A_36 KEPT: E32_18, E32_5, G7A_13, G7A_34 DROPPED: G7A_4
这是excel种的某一列，我需要把ADDED后的变量名依次拆出到不同单元格，然后把KEPT和DROPPED后的变量也依次拆出，请问该怎么写VB实现呢？