I am replying from mobile device now so i am unabe to edit your code.

Replace all target with Target.cells(16) in the below code.

Call Mail(Target.Offset(, -11), Target.Offset(, -13), Target.Offset(, -6), Target.Offset(, -2))