Edit macro to remove all special characters from a single column

I'm trying to edit a macro so that it removes all special characters, except the ones listed, within a specified column instead of globally. I think this is the only line that needs editing:
        objCell.Value = RegEx.Replace(objCell.Value, "")




Sub RegExReplace()

    Dim RegEx As Object
    Set RegEx = CreateObject("VBScript.RegExp")
    RegEx.Global = True

    RegEx.Pattern = "[^A-Za-z0-9_-() ]"
    For i = 2 To Range("B1048576").End(xlUp).Row
        objCell.Value = RegEx.Replace(objCell.Value, "")
    Next

End Sub