Plusieurs alternatives s'offrent à vous et pas forcément avec l'utilisation de macro

Sélectionner les cellules 

pour la couleur ==> utilisation de la fonction Onglet accueil - Mise en forme conditionnelle 
Régles de mise en surbrillance , Inférieur à 

dans la fénêtre d'invite dans le champ gauche écrire la formule =aujourdhui()

possibilité de changer les couleurs

Pour dénombrer , il est souhaitable d'ajouter une colonne, avec une fonction si par exemple 
Pré requis dans mon cas la date d'échéance se trouve en colonne A , identifier la votre 
=SI(A2>AUJOURDHUI();"OK";"Dépassée") 

ou =SI(A2>AUJOURDHUI();"Ech. Dans "&A2-AUJOURDHUI()&" jours";"Dép. Ech. De "&AUJOURDHUI()-A2&" jours")

Bon courage