Remove and Replace All Characters in Microsoft Excel using VBA

The following FindandReplace() function allows you to replace or remove specific text and characters you want in Microsoft Excel. Just copy the code below on your VBA code class or module.

Sub FindandReplace(FindWhat as String, ReplaceWith as String)

        Cells.Replace What:=FindWhat, Replacement:=ReplaceWith, LookAt:=xlPart, SearchOrder:= _
        xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

End Sub

Put this in your Sub or Function.

To Replace several text with new text.

FindandReplace "OldText", "NewText"

To remove several text just leave the second argument blank.

FindandReplace "OldText", ""