The only thing I see in that block of code that looks odd right-off is: c = St_Project

Replace that with c.value = St_Project - Possibly that is the issue? I there is nothing wrong with c.Offset(0, 2).Value = St_Location that I can see.