I would split them into seperate feilds in excel first, before importing, it should be reasonably straightforward to write a function in excel, something like:
Mid([City_State], 1, (InStr([City_State], ",")-1))
should return anything before the comma
Mid([City_State], (InStr([City_State]...