=IF(MAX(INDIRECT(A1&"!B5:B200"))(TODAY()-21),"not due","due")

should sort it out where A1 contains text Sheet2
Copy down so A2 contains Sheet3 etc.

HTH
RES