Yes, use a query.
SELECT EmployeeNumber, FirstName, LastName, DeptNo
FROM a table
WHERE criteria = somevalue
open that in a recordset, now you can do what you want with it:
dim db as dao.database
dim rs as dao.recordset
set db = currentdb
set rs = db.openrecordset("queryname or SQL...