Macro to fix zipcodes

I have a spreadsheet and I have to fix zip codes everyday for the map to read them
Example if zip code is 66606-5648 map will read the zip code,
but if its 66606 it will not read it
I need to macro that It will fix the zip code form 66606 to 66606-5648 the zip code doesn’t have to have the correct last four digits just any last four digit I attach a sample of the file
Any help will be greatly apreciate