อ้ออ เข้าใจแล้วค่ะ แต่ว่าไม่เกี่ยวกันค่ะ เพราะว่า ตัวโค้ดมีเท่านั้นเลยค่ะ ลองสร้าง textbox อีกตัวขึ้นมาแล้วใส่ค่าที่ทศนิยมเยอะๆลงไป ไม่เกิด error ค่ะ ถ้าเป็นเป็น textbox ตัวอื่น แต่ถึงอย่างนั้นก็ไม่รู้ว่าจะพลิกแพลงแก้ปัญหาอย่างไรดีค่ะ
ต้องดูที่ textbox นั้นแล้วละครับ ว่า มีการคำนวนแบบไหน ตั้งค่าไว้แบบไหน
type mismatch คือ ประเภทหรือชนิดข้อมูลไม่เหมือนกัน
1.Msgbox backmargin_sum_percent
ต้องการดูว่าค่าเป็นแบบไหน
2.ถ้ากำหนดตัวแปรมาเก็บค่าไว้แล้ว นำไปอัพเดทได้ไหมเช่น
Dim strAAA As String
strAAA = Me.aaa
CurrentDb.Execute "UPDATE [proAssess Detail] SET [proAssess Detail].backmargin_sum_percent = " & strAAA & " WHERE ((([proAssess Detail].proRequest_ID)='" & Me.proRequest_ID & "'))"
3.ลองวิธีแปลงค่าก่อนนำไปอัพเดทในตารางเช่น
Val(Replace(backmargin_sum_percent.Value,"%",""))
4.ผมลองสร้างคิวรี่ SQL ประมาณนี้
CurrentDb.Execute "UPDATE [proAssess Detail] SET [proAssess Detail].backmargin_sum_percent = " & Val(Replace([Forms]![Mainform].[SubForm].[Form]![aaa], "%", "")) & " WHERE [proAssess Detail].proRequest_ID = '" & [Forms]![Mainform].[SubForm].[Form]![proRequest_ID] & "'"