(27/12/2017, 22:39)WiniFred yazdı: Doğru anlamışsam ve [Dosya No] kısa metin türünde ise;

Dim dno as string

olarak düzeltin. Ayrıca sorguda dno'yu yazdığımız kısmı;

[İşbaşıEğitimListesi].[Dosya No]='" &  dno & "') AND 

şeklinde düzeltin (eşittirden sonra ve parantezden önce tek tırnak ekleyin).

Dediğim gibi, doğru anlamışsam.

doğru anladınız hocam, göndermeden önce As String olayını denemiştim, o da olmayınca sormuştum bir önceki mesajı. 
tek tırnakları ekledim, bu sefer where olayını hiç yapmadı. sonra sizin yazdığınızdan bi şey dikkatimi çekti. ben where'deki ifadeleri & ile birleştiriyordum, siz AND yazmışsınız, onunla değiştirdim (eskiden oluyordu, yeni versiyonlarda mı olmuyor anlamadım)
bu sefer oldu. sorunum çözüldü yani - teşekkürler.