Using a helper column B, assuming your data in Col A starting A2, in cell B2
put
=MID(A2,FIND(",",A2)+1,LEN(A2))&", "&LEFT(A2,FIND(",",A2)-1)
and copy down.
Copy and paste special as values to lose the formulas.
--
Regards
Ken....................... Microsoft MVP - Excel
Sys Spec - Win XP Pro / XL 97/00/02/03
----------------------------------------------------------------------------
It's easier to beg forgiveness than ask permission

----------------------------------------------------------------------------