Give Helper Column a Title Cell

Hello, below is my code that creates a helper column on the last column of data +1. The function creates the helper column with no problem, but the title cell is blank. How can I specify what I want the title cell of the helper column to read?

'Max Last Call (MAX of step codes 2005, 2010, and 2015)
    With Range(Cells(2, cLastCall), Cells(LR, cLastCall))
            .FormulaR1C1 = "=IF(AND(RC" & vOBNoContact & " ="""", RC" & vOBContact & " ="""", RC" & vIBContact & _
            " =""""), """", MAX(RC" & vOBNoContact & ", RC" & vOBContact & ", RC" & vIBContact & "))"
            .NumberFormat = "mm/dd/yyyy"
            .Value = .Value
    End With

Thank you.