No dices como se sabe si un pedido está pendiente de entregar. Vamos a suponer que hay una casilla Sí/No llamada Entregado.
Puedes hacerlo de muchas formas. Por ejemplo, supongamos que en el formulario tienes un cuadro de texto llamado Buscar donde vas a escribir el número del Cliente. En sus propiedades-eventos-Después de actualizar puedes poner
Dim i as integer, respuesta as byte
i=dcount("*",nombreconsulta","Numcliente=" & me.buscar & " and entregado=false")
respuesta=msgbox("Este cliente tiene " & i & " pedidos sin entregar. ¿ Quiere verlos",vbyesno,"Hay que despedir a algún empleado")
If respuesta=vbyes then
docmd.openquery"nombredelaconsulta"
elseif respuesta=vbno then
docmd...lo que quieres que haga en este caso
end if
En la consulta, debajo del campo Numcliente, en la casilla criterios pon
Forms! Nombredelformulario! Buscar
y debajo del campo Entregado, en criterio pon False