cheers for all your help and this really annoying me now as im trying everything you say and more.
this is the line at the moment:
MsgBox DCount("[Name]", "absent", "[Name]" = '" & combo136.value & "'")
but it errors at the first single quote, it wont let me finish the line.