Bonjour,

Dans tableau Xls, colonne A : dates jusqu'au 31 décembre.


J'ai créé un bouton pour aller directement dans la cellule de la date du jour.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Sub Bouton1_Clic()
LIGNE = 1
While Range("A" & LIGNE) <> Date
    LIGNE = LIGNE + 1
Wend
Range("A" & LIGNE).Select
End Sub
TOUT OK mais ...... est-il possible que cette cellule se colorie en fond jaune ?
puis elle redevienne blanche quand désélectionnée ?

Autre question : Je désire créer un deuxième bouton qui permette d'entrer une date et aller directement à cette date.
Possible aussi qu'elle se mette d'une autre couleur et redevienne blanche quand désélectionnée ?


Merci