Merhabalar

Access 2007 de Microsoft forms 2.0 textbox ile yapamadığım filtrelemeyi forumdaki diğer arkadaşlarında yardımları ile çözmüş bulunmaktayım.
İşe yarayacağını umuyorum.

Saygılar


Forma yeni bir textbox ekliyor ve değiştiğinde olayına aşağıdaki kodu yazıyoruz.

Private Sub Metin11_Change()
Requery
DoCmd.ApplyFilter , "[servısno] Like'*" & Me.Metin11 & "*'"
If IsNull(Me.Metin11) Then
Me.Metin11.SetFocus
Else: Me.Metin11.SetFocus
Me.Metin11.SelStart = Len(Me.Metin11.Text)
End If
End Sub