Bonjour,
Je n'ai toujours pas tout compris de ce que vous vouliez faire initialement ni de ce que faisait le code que vous venez de joindre, mais pour revenir au début, soit comparer le contenu de cellules au format "hh:mm:ss" à l'heure système essayez (vous remplacez Today par Time) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 private sub worksheet if range("A1") >= Time then me.tab.colorindex=4 end if if range("B1") >= Time then me.tab.colorindex=3 end if end sub
Partager