Replace hex code A0 to 20(Space) in excel

Replace hex code A0 to 20(Space) in excel
 


  ปวดหัวเลย convert data จาก excel เจอ  hex code A0 เข้าให้มันเป็นตัวอะไรไม่รู้ที่ไม่แสดงผลอะไรเลย
พอโหลดเข้าระบบแล้ว โปรแกรมมองไม่รู้เรื่องเลยออกมาเป็นอักขระอะไรไม่รู้ 
   เราเลยต้องมาเขียน VBA ใน Excel (อันนี้มั่วๆ เอาเองเลยครับ ทั้งวิธีใช้ทั้งโค้ด เพราะไม่เคยเขียน) 
 
ไปเปิด VBA Develop เองนะครับหาเอาตามเน็ตมีวิธีบอก จากนั้นก็ เอา Code ข้างล่างนี้ไปรันแล้ว 
save เลยครับเสร็จสิ้น
Sub Replace()

  Cells.Replace What:=Chr(160), Replacement:=" ", LookAt:=xlPart

End Sub 
 
* หมายเหตุ :
Char(160) -> HEX A0 = DEC 160
เนื่องจาก excel มันจะมองได้แต่เป็นตัวอักษรมันไม่แสดง A0 ออกมาเราเลยต้องใช้ Function Excel หาเข้า A0

Comments