Discussion :

[Excel_Lent]

Bonjour,

Je souhaite crééer un code VBA pour :

au lancement du classeur

1. la date du jour se met en "A1" , on ouvre le classeur le lendemain et la date du jour se met en "A2" ainsi de suite jusqu'à la fin du mois, sans que cela efface les autres dates précédement notés.

2 Ensuite comment comparer des valeurs changeante avec d'autres et attribuer une couleur rouge par exemple à la valeur la plus élevé
Exemple (ce sera plus claire)
les valeurs attribuées au cellules changeront chaques jours
B10 = 5
C10 = 8
D10 = 25

Donc ici D10 est plus élevé au premier jour, donc je souhaite colorier la case ou la colonne de D110 en rouge.
Puis le lendemain C10 a une valeur de 35

J'espère être clair dans la description de mon exemple

NB: je souhaite utiliser exclusivement VBA

Meric pour vos conseils à venir

[mercatog]

Une approche (Dans le module Thisworkbook)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub Workbook_Open()
Dim LastLig As Long
 
With Sheets("Feuil1") 'A adapter
    LastLig = .Cells(.Rows.Count, 1).End(xlUp).Row
    On Error Resume Next
    If DateDiff("d", Date, CDate(.Range("A" & LastLig).Value)) <> 0 Then .Range("A" & LastLig + 1).Value = Date
End With
End Sub

[Excel_Lent]

Merci,

ça fonctionne super, je pensais que ce serait plus simple mais finalement ça semble compliqué surtout pour un novice.

Pour le reste je vais cherche une solution j'ai une piste avec les structures conditionnelles.