tam anlayamadım ne yapmak istediğini,buna benzer kod bulursam tekrar buraya eklerim........
Dim rs As Object
DoCmd.OpenForm "MÜŞTERİLİSTESİ"
Set rs = Forms!MÜŞTERİLİSTESİ.recordset.Clone
rs.FindFirst "[ADISOYADI]=" & "'" & Me![ADISOYADI] & "'"
If Not rs.EOF Then Forms!MÜŞTERİLİSTESİ.Bookmark = rs.Bookmark
DoCmd.Close acForm, Me.Name
bunları bir dene........
