more email dependend functions
First function try for cw to range
Merge complete