adds percentages to new columns of the raw data file exported from LM Tool

addPercentagesLMTool

Sub addPercentagesLMTool()

    ActiveCell.FormulaR1C1 = "percPreApproved"
    Range("I1").Select
    ActiveCell.FormulaR1C1 = "percApproved"
    Range("J1").Select
    ActiveCell.FormulaR1C1 = "percPreRejected"
    Range("K1").Select
    ActiveCell.FormulaR1C1 = "percRejected"
    Range("L1").Select
    ActiveCell.FormulaR1C1 = "percOnHold"
    Range("H2").Select
    ActiveCell.FormulaR1C1 = "=(RC[-5]/SUM(RC3:RC7))*100"
    Range("H2").Select
    Selection.AutoFill Destination:=Range("H2:L2"), Type:=xlFillDefault
    Range("H2:L2").Select
    Selection.AutoFill Destination:=Range("H2:L364")
    Range("H2:L364").Select

End Sub