Replacing Special Characters

[OrWolf]

I'm trying to develop a function to replace any special characters that are input by the user. I'm really close, however the I can't replace a value with null or "". My only option seems to be replacing with a space, and this can leave the entered data looking rather odd. Does any one know a better way to do this then below?

BadCharPos = InStr(1, InputVal, SpecialChar)
If BadCharPos > 0 Then
Mid(InputVal, BadCharPos) = " "
End If

Thanks for your help!

 

[DougP]

did you try replacing it with a ""
no space between the quotes.
You can set something to a null also

x = null

Not sure exactly what you are doing.

DougP, MCP

Visit my WEB site

http://www.barcodeone.com

to see how Bar-codes can help you be more productive