Snasui Excel Forum

สอบถามการเขียน Macro encoding
ถ้าอ่าน ด้วย Text editor อ่านไทยได้ เช่น "อัคริศา โตรักษา"

แต่พออ่านแล้วเขียนลง excel เป็น ภาษาอ่านไม่ออก ตามด้านล่าง
"เน€เธ™โ‚ฌเน€เธ˜เธเน€เธ˜เธ•เน€เธ˜เธ‚เน€เธ˜เธเน€เธ"

มีคำสั่งอะไรที่ encoding ไหมครับ ให้แปลงให้อ่านภาษาไทยใน excel file

นี่คือ code ที่เขียนครับ

Sub ReatThaiTextfile()

Dim strFile As String
Dim strLine As String

FilePath = Range("c3").Value
strFile = FilePath
Open strFile For Input As #1
i = 1
Do Until EOF(1)
Line Input #1, strLine
detailRec = strLine
Worksheets("Test123").Cells(i, 4).Value = detailRec
i = i + 1
Loop
Application.ScreenUpdating = True
Close #1


End Sub

ช่วยแนบไฟล์ที่เกี่ยวข้องเพื่อประกอบคำถามจะได้สะดวกต่อการตอบของเพื่อนสมาชิก ทั้งกรุณาโพสต์ Code ให้แสดงเป็นข้อความ Code ดูตัวอย่างในกฎการใช้บอร์ดข้อ 5 ด้านบนประกอบครับ