NewS.Range("A1:L1")=split("Department_Sub Department_rngClass_Sub rngClass_Master Sku_rngMsku Desc_First Exception Date_1st Exception_2nd Exception_3rd Exception_4th Exception_5th Exception_6th Exception","_")