เปิดเทเบิลขึ้นมา หรือถ้าเทเบิลมีฟิลด์อื่นที่ไม่ต้องการอัพเดตอยู่ด้วย ก็ให้สร้างคิวรี่ที่แสดงเฉพาะ 50 ฟิลด์นั้นแล้วเปิดขึ้นมาแทน

กด Ctrl-H เพื่อ replace ค่า

Find What เป็น Null
Replace With เป็น 1
Look In เป็น Current Document
Match เป็น Whole Field
Search เป็นตามที่ต้องการ

กดปุ่ม Replace เท่านี้เองครับ แต่ควรทดสอบก่อนนะครับ หรือแบ็คอัพข้อมูลไว้ก่อน เพราะทำแล้วย้อนกลับไม่ได้ครับ

เรียน อ.สันติสุข

ลองวิธี กด Ctrl-H เพื่อ replace ค่า แล้วครับ
แต่กลับได้คำตอบว่า The Search item was not found
ทั้งๆ ที่ ข้อมูล เป็นค่าเปล่า
เหมือนกับว่า การทำแบบนี้เป็นการค้นหาคำว่า Null
ไม่ใช่ค่าเปล่าที่แท้จริง

ถ้าทำแบบ
UPDATE MONEY SET MONEY.Field1 = 1
WHERE (((MONEY.Field1) Is Null));
ทำได้ครับ แต่ต้องมาทำทีละ field

เอ... ทำไมเครื่องผมทำได้

ส่วนคำสั่ง SQL UPDATE statement ผมยังคิดไม่ออกนะว่าจะทำยังไง ถึงแม้ทำได้ ผมก็คิดว่ามันอาจจะยาวเกินกว่าที่ Access จะรับได้ ก็ต้องมาทำหลายคำสั่งอยู่ดี

หรือทำอย่างเดิมแล้วรวม 50 update อยู่ในแมโครเดียวเพื่อเรียกใช้เพียงที่เดียว ไม่ต้องมานั่งกดๆ หลายครั้งพอแก้ขัดไปก่อน

หรือเขียนเป็นโปรแกรม VBA เล็กๆว่า
Public Sub ReplaceMoney
   Dim N As Integer

   For N = 1 to 50
      DoCmd.RunSQL "UPDATE MONEY SET MONEY.Field" & cstr(N) & " = 1 WHERE MONEY.Field" & cstr(N) & " Is Null"
   Next N
End Sub

แล้วก็เรียกใช้ procedure นี้แทนครับ

ถ้าเป็นการแก้เป็นครั้งคราวก็ไม่ต้องเขียนโค๊ดหรอกครับ ทำอย่างที่ อ.สันติสุข แนะนำแหละครับ

เปิดตารางเป้าหมาย กด Select ไปที่ฟิลด์แรก เรคคอร์ดแรก
กด Ctrl-H เพื่อ replace ค่า

Find What: Null
ถ้า Null ไม่ได้ ก็เปลี่ยนเป็น ""

Find What: ""
Replace With: 1
Look In: Current Document
Match: Whole Field
Search: All

แล้วก็กดปุ่ม Repace all