How to eliminate a (R) ® (registered trademark) from a string

[snipe]

Hey guys,



My manufacturer has thrown a curveball at me. They push a list of all active SKU's to us through an ODBC. We import those new SKUs into our Point of Sale database (called GERS if anyone is familiar). Everything has been fine and dandy for the past 7 years, until now. They started throwing in that circle R symbol ® on some of their newer products. Our POS system doesn't like that character and puts in a question mark in its place. The field in our POS system is the description of the item, which shows up on the customer's receipt. I don't need our products not being sure of themselves haha.

Is there a simple VBA function that I can write that loops through every character in the description field (named DES in table ITEM)? If the character is any of the standard keyboard characters, use that, if not, delete the character (or use "" or something along those lines).

Thanks for the help!

[orange]

I think the Registered® Trademark Code is ASCII 169.
You could try Replace(DES,"®"," ") to replace with a space.

Sub testj()
Dim x As String
x = "this is a test® with a non standard code"
Debug.Print x
x = Replace(x, "®", " ")
Debug.Print x

End Sub

gives output

this is a test® with a non standard code
this is a test  with a non standard code

Dev Ashish has a function to check alphanumeric here. You could adapt as necessary.

Good luck.

[snipe]

That's exactly what I need!

Thanks bud!