Replacing Printable Ascii Codes

  • Thread starter Thread starter susanmgarrett
  • Start date Start date
S

susanmgarrett

I have a column that contains a text log of search terms entered in a search
box. The column contains the code for the printable ascii characters (like
%20 for space, %24 for $, etc), but does contain the actual alpha/numeric
characters

Is there a function in each that will allow me to change the codes to the
actual characters or will I have to create a massive search and replace macro
for the 34 codes.
 
Your suggestion about the macro is O.K. It is not massive. Start with:

Sub PercentConverter()
For Each r In ActiveSheet.UsedRange
v = r.Value
v = Application.WorksheetFunction.Substitute(v, "%20", " ")
v = Application.WorksheetFunction.Substitute(v, "%24", "$")
r.Value = v
Next
End Sub

and add the remaining 30 lines of code.
 
Back
Top