=Substitute("Bill at MrExcel.com"," at ","@")
=CLEAN(IF("MONKEY"="monkey",LEFT(TEXT("Thanks","#.###.###.###,###")&REPLACE(" BUT YOU COMPLICATE THINGS",1,50,".")&SUBSTITUTE("FOR NO APARENT REASON","FOR NO APARENT REASON","I apperciate that.",1),50),""))
=CLEAN(IF("MONKEY"="monkey",LEFT(TEXT("Thanks","#.###.###.###,###")&REPLACE(" BUT YOU COMPLICATE THINGS",1,50,".")&SUBSTITUTE("FOR NO APARENT REASON","FOR NO APARENT REASON","I apperciate that.",1),50),""))