Koda yazdığınız [CihazKayit] hatalı, buraya liste kutusunun 1. satırı olan veri ile eşlecek tablodaki alan adını yazmalısınız.
Liste kutusunun 1. satırında "IDMusteri" alanı olduğu için [CihazKayit] yerine [IDMusteri] yazmalısın.

kod şu şekilde olacak

    rs.FindFirst "[IDMusteri] = " & Str(Nz(Me![Liste1], 0))

ayrıca, formda arama olayı eksik yapılmış. Liste kutusunun satır kaynağının aşağıdaki ile değiştirilmesi gerekli

SELECT IDMusteri, AdiSoyadi, Adresi, Telefon, CihazTuru, Marka, Model, [Seri no], GelisTarihi, GelisSaati, Arızası, Fiyati FROM CihazKayit WHERE (((AdiSoyadi) Like "*" & [Formlar]![Kayıt Arama]![gecici] & "*")); 

Uygulamanıza eklediğiniz makrolar yerine olay yordamı kullanmaya çalışın. Böylelikle kod bilginizi geliştirebilirsiniz.