Alıntı:rs.Open strSQL, CurrentProject.Connection
hatası geliyor şimdide. referanslardan ado ile ilgili sanırm

ADO ile ilgili değil hata. Dikkat ederseniz uygulamayı çalıştırınca ölçüt ifadesinde veri türü uyuşmazlığı diyor. Vba penceresine geçip kodlarınızı inceleyelim:

"SELECT * FROM kategori WHERE IDKategori =" & Me.CariListe & ""

yazmışsınız. İlk hatanız en sonda iki tane çift tırnak kullanmanızdan kaynaklanıyor. Yapacağınız tek şey Sql sümlesindeki WHERE şartında kullandığınız ölçütü/kriteri uygun şekilde kullanmak.

Peki bunu nasıl anlarsınız? IDKategori= demişsiniz IDKategori alanına tablodan bakacaksınız eğer metin türünde ise tek tırnaklar arasında yazacaksınız. Eğer sayı olsaydı o zaman tek tırnak olmadan yazmalısınız:

Metin türü alanlarda şart tek tırnaklar arasına yazılır : Musteri='AccessTR.NET'
Sayı türü alanlarda şart direkt eşittirden sonra yazılır : Borc=5000

şeklinde kullanılmalıdır. Bu bilgiler ışığında Vba penceresindeki Sql cümleniz şu şekilde olursa hatasız çalıştığını göreceksiniz:

"SELECT * FROM kategori WHERE IDKategori ='" & Me.CariListe & "'"