Code doesn't display any result

Hi guys

I want to display query result from access table in Excel sheet. In this project the backend is Access and the frontend is excel. But the sheet 3 doesn't display any value.

Please Login or Register  to view this content.

Can anyone please solve my problem.

Regards
Aman

A few things wrong:

1. Take the spaces out before ComboBox1.Value in the rs.Find statement:

Please Login or Register  to view this content.

2. The y = 1 statement should be outside the Do While loop.

3. Fields start at zero, so adjust your For loop.

4. Instead of rs.Movenext use rs.Find with the same criteria.

Please Login or Register  to view this content.

Also any reason why you are not using SQL to only retrieve the records you want and not the whole table?

Please Login or Register  to view this content.