Remove unwanted character from cell

[laam090]

I have Thai characters and English characters in a cell, I want to remove Thai and keep only English what do I need to do? Please help

 

[cooper645]

are they mixed between each other or is there always a common separator?

 

[laam090]

They are mixed with each other

 

[FormR]

Hi, here is one option you can try, select the cells you want altered and run the code - test this on a copy of your workbook.

Sub RemoveThaiChars()
Dim i As Long
Application.ScreenUpdating = False
For i = 3584 To 3711
  Selection.Replace ChrW(i), "", xlPart, , False, False, False, False
Next i
Application.ScreenUpdating = True
End Sub

 

[laam090]

thank you very much for the response and Yes that worked exactly how i wanted.. Thank you very much