שלוםלכולם,

אני מנסה להריץ שאילתא דרך קוד ב VB. לאחר שהמשתמש הזין ערך בתיבה משולבת אני מריץ שאילתה אשר אמורה לתת שדה אחד עם מספר דינמי של שורות

אבל אני מקבל רק שורה אחת.לא מבין למה?

אודה לכל מי שיוכל לעזור לי....

אתה מצפה שנעזור לך בלי שתעלה שום קוד?

Private Sub combinedPaper1_Change()

Dim Rs As DAO.Recordset

Dim s As String

Set Rs = CurrentDb.OpenRecordset("SELECT Tbl_PaperWeight.WeightPap FROM Tbl_PaperWeight WHERE Tbl_PaperWeight.Id_Pap=" & Forms!Doch_Perut_NewOfset!combinedPaper1)

s = Rs.RecordCount

End Sub