Make a Specific Column or Range to Absolute Values (Excel VBA)

See below for a sample to change all value in Column I to M to their absolute Values

Sheets("Trans").Select
    LastRow2 = Cells(Rows.Count, 1).End(xlUp).Row
with ActiveSheet
Set rngToAbs = ActiveSheet.Range("I1:M" & LastRow2)
rngToAbs.Replace what:="-", lookat:=xlPart, replacement:=""
End With