Excel loop, inner loop

Hello,
I have an excel file that has data in a cell that looks like "abcd-123456-efghijk-7890". My problem is that i have about 2000 of this type of data (exact same format) in one column. I would like to write a loop and inner loop and goes through all the active columns and just copies "abcd" and pastes it into column +1, copies 123456 and pastes into column +2, copies "efghijk" and pastes into column +3, and copies "7890" and pastes in coumn +4. I am an excel vba newbie and any help would be greatly appreciated.