How to remove special characters from Text Data in Excel

Function Remove(Str As String) As String
'UPDATE BY PITAARA TECH
Dim xChars As String
Dim I As Long
xChars = "/.',0123456789#$%@!()^*&"
For I = 1 To Len(xChars)
Str = Replace$(Str, Mid$(xChars, I, 1), "")
Next
Remove = Str
End Function

[anasaziz]

Nice work dear... really very helpful and thank you... Wishing a great future....

[imranhossenlimon]

You are great boss! It's really helps us! Love from Bangladesh!

[mariellarangas]

omg thankyou boss you made my day Godbless you Sir

[yasielmesa]

Amazing man! Thanks. By the way is there any VBA programming course you would recommend? I'm Advanced with DAX, SQL, and the Excel formula language but intermediate with VBA and want to bring it to the next level.

[vivekdubey]

Thank you so much, this formula has helped me a lot.

[dhavaldesai]

Saved me a lot of time and efforts. Thank you so much for sharing.

[pitaaraopenit]

Function Remove(Str As String) As String
'UPDATE BY PITAARA TECH
Dim xChars As String
Dim I As Long
xChars = "/.', 0123456789#$%@!()^*&"
For I = 1 To Len(xChars)
Str = Replace$(Str, Mid$(xChars, I, 1), "")
Next
Remove = Str
End Function

[Akashdahiwad]

thanks a lots brother saving my job
great things you done

[mahendrarajpurohit]

What if it's chats, it will also remove space btw the sentence and concatenate it or will remain same

[sachinshirose]

Very good info. I applied the code for 100 price values like Rs.34, 24, 250/-. I got output as numeric values like 3424250. But when I tried to apply =sum() function on these 100 values output is shown as zero 0. Plz help me.

[boogachap]

Thank you sir! Incredible. How would you apply this to removing "January, February, March, April, May, June, July, August etc."

[abhijitnandy]

Need to remove space and double spaces as well.

[manimaltv]

I have the same scenario but a korean and english text combine. How to remove the korean characters?

[vigneshravi]

I want to remove special character from 20 lakhs of data in MS Access... Can you provide query for this... Pls

[RahulTiwarikalyan]

Not able to copy the code from comment box, can help me to get on mail

[alisadenis]

John if you don't have excel installed you can use www.text-filter.com online text tools

[nareshpandu]

Bro link not copied bro how to copy bro

[pitaaraopenit]

Function Remove(Str As String) As String
'UPDATE BY PITAARA TECH
Dim xChars As String
Dim I As Long
xChars = "/.', 0123456789#$%@!()^*&"
For I = 1 To Len(xChars)
Str = Replace$(Str, Mid$(xChars, I, 1), "")
Next
Remove = Str
End Function