ActiveCell.Offset(0, 9).FormulaR1C1 = ActiveCell.Offset(0, -2).Value
ActiveCell.Offset(0, 9).Font.Name = "Calibri"
ActiveCell.Offset(0, 9).Font.Size = 11
ActiveCell.Offset(0, 9).Font.Bold = True
ActiveCell.Offset(0, 9).HorizontalAlignment = xlCenter
I have several sections of code similar...