That works perfectly thank you.
If I wanted to add a further criteria - Where field is Completed "yes" or "no"
Would this be DCount("[Department]", "work_items", "[Department] = 'Sales' & [Work Complete]='No'")
I did attempt the above but it shows as #Error?