Text correction function

Try, in cell C3:

Formula:

=SUBSTITUTE(LEFT(SUBSTITUTE(SUBSTITUTE(A3," ","|",1)," ",""),FIND("|",SUBSTITUTE(SUBSTITUTE(A3," ","|",1)," ",""))-1) &

IF(LEN(MID(SUBSTITUTE(SUBSTITUTE(A3," ","|",1)," ",""),FIND("|",SUBSTITUTE(SUBSTITUTE(A3," ","|",1)," ",""))+1,99))=4,"-" &

MID(MID(SUBSTITUTE(SUBSTITUTE(A3," ","|",1)," ",""),FIND("|",SUBSTITUTE(SUBSTITUTE(A3," ","|",1)," ",""))+1,99),2,2),""),"_","-")

and copy down.