My guess is that the ranges David, Jason, ..., Erica are single cell ranges, and the code clearly states

 ActiveCell.FormulaR1C1 = MyCell.Formula
which suggests that is where the name in the worksheet is coming from.

Are all those ranges on the same sheet and you want to print just that part, or are they on separate sheets (I cannot see where the sheet gets selected if so)?