"INSERT INTO table1 VALUES ('" & ChrW(&H..............) & "')"

บริเวณจุดไข่ปลา คือให้ใส่เลขฐาน16 ที่เป็นรหัสของอักขระที่ต้องการ


ตัวอย่าง (สร้างตาราง table1 ฟิลด์เดียว แล้วรัน..)
Sub EXA()
For i = 2260 To 2265
sq = "INSERT INTO table1 VALUES ('" & ChrW("&H" & i) & "')"
docmd.runsql sq
Next
End Sub

ขอบคุณครับ จะได้เก็บไว้ใช้

พอจะเอาไปใช้แล้วเกิดติดครับ...
แล้วผมจะเอารหัสเลขฐาน 16 มาจากไหนหละครับ

พอดีตัวอักษรพิเศษที่ผมต้องการผม copy มาจาก charmap

รบกวนอีกทีนะครับ

ดูจากรูปนะครับ อักขระพิเศษที่เห็นนี้ คือ 1ส่วน4
รหัสอักขระซึ่งเป็นเลขฐาน16 จะสามารถมองเห็นได้บริเวณที่วงสีแดงครับ

ตัว U ที่อยู่หน้าสุด เข้าใจว่าน่าจะมาจากคำว่า unicode เครื่องหมายบวกต่อมา ไม่รู้ความหมายเหมือนกันครับ แต่เอาเป็นว่า ทั้ง U+ สองตัวนี้ไม่เอามาครับ สี่ตำแหน่งต่อมานั่นละครับ เลขฐาน16

ตัวนี้คือ BC ครับ
จะเขียนครบ 4 ตำแหน่งก็ได้ คือ 00BC หรือจะตัด 0 ด้านหน้าออกก็ได้ครับ

ขอบคุณครับ แต่ผมใช้วิธีกลับกัน
คื่อ ผม copy ตัวอักษรมา แล้วไปใส่ใน textbox เสร็จแล้วใช้ function
AscW เพื่อกลับตัวเลขออกมา

มันได้ผลลัพท์ออกมาเป็นตัวเลข 4 ตัว ซึ่งไม่ตรงกับ กับ เลขฐาน 16
แต่มันสามารถเอาไปใช้กับ ChrW() ได้ตรงเลย โดยไม่ต้องเติม H ข้างหน้า