ใส่เป็นแบบนี้ดูครับ
ตัวอย่าง filter
DoCmd.ApplyFilter , "[แผนก] Like '*" & [Forms]![Manpower]![TxtSearch] & "*'"
หรือ
Me.Filter = "[แผนก] Like '*" & [Forms]![Manpower]![TxtSearch] & "*'"
Me.FilterOn = True
ถ้าไม่เอาแบบ like ค้นหาตรงตัวไปเลย
DoCmd.ApplyFilter , "[แผนก] =" & [Forms]![Manpower]![TxtSearch]
หรือ
Me.Filter = "[แผนก] =" & [Forms]![Manpower]![TxtSearch]
Me.FilterOn = True