Merhaba Berduş

Yardımların için teşekkürler tüm uyarlaman sorunsuz çalıştı.

4 - metin13ün güncelleştirme yada çıkıldığında olayının kodu;

Private Sub Metin13_AfterUpdate()
StrFiltre = ""
If Not IsNull(Me.Metin13) And Not IsNull(Me.Liste8) Then StrFiltre = "MALZEME=" & Me.Metin13 & " and SİCİL=" & Me.Liste8
Me.[SRG_ZİMMET_ALT_FRM].Form.Filter = StrFiltre
Me.[SRG_ZİMMET_ALT_FRM].Form.FilterOn = True
End Sub

listeye tümü eklemek gerekir mi sizce?
Metin13 de yapılan seçim sonrasında seçilen malzemeyi silmek istediğimde tüm liste geriye gelmiyor sadece son filtre edilen yada farklı filtre edilen geliyor.

Metin13'ün tablosuna tümü diye ekleme yapıp çıkıldığında olayına nasıl güncelleme yapmam gerekir?

SRG_ZİMMET_ALT_FRM için açılışta boş gelmesi "liste8" için çift tıklama sonrasında  SRG_ZİMMET_ALT_FRM veri ile dolması daha iyi olacak gibi bu durum için hangi güncellemeleri yapmalıyım.