Excel Forum

:D กรุณาโพสต์ Code ที่ปรับแก้แล้วมาด้วยจะได้ทราบว่าเขียนอะไรไปแบบไหน อย่างไรครับ

การที่ขึ้นกล่องข้อความนั้นปกติคือคีย์ Field ในเครื่องหมายก้ามปู ทำให้กลายเป็น Criteria ที่ผู้ใช้ต้องคีย์เข้าไปเอง แต่ถ้าให้เดาตามกล่องโต้ตอบที่จับภาพมา คือ คีย์ Filed ที่ไม่มีอยู่จริง Filed ที่มีอยู่จริงคือตามภาพครับ ...

Code ที่มีการแก้ Update ไปครับ และแนบ File มาเพิ่มหลังแก้มาให้ด้วยครับ
ขอบคุณครับ

Private Sub Command32_Click()
Dim SqlStr As String

If Len(TxtSearch) = 0 Or IsNull(TxtSearch) = True Then
MsgBox "You must enter a search string."
Else
GCriteria = " Like '*" & TxtSearch & "*'"
SqlStr ...

ขอบคุณมากครับ ตอนนี้ Code ไม่ Error แล้วครับ แต่หลังกด Search มี Popup "Enter Parameter Value" ขึ้นมาแทน แบบนี้เกิดจากอะไรหรอครับ

GCriteria = " Like '*" & txtSearchString & "'*"
Form_frmCustomers.RecordSource = "select * from Customers where " & GCriteria


หลังจากกด Search ที่ฟอร์มแล้วจะขึ้นหน้าค้นหามาให้ครับ เช่นใส่ RO เข้าไปสิ่งที่ผมต้องการคือเหมือนเป็นการค้นหาคำว่า RO จากทุก Field มาแสดงในหน้า Display แต่เกิด Error ...