Bonjour,
Je récupère une date dans une cellule que je place dans une variable.
Ensuite, et c'est là où çà pêche, je voudrais incrémenter cette variable contenant la date de x jours. Si quelqu'un peut me donner la syntaxe çà serait sympa.
Par avance merci !
POur info mon morceau de code :
Dim coord As String
Dim num_ligne As String
Dim a As String
num_ligne = "6"
Do While (num_ligne < 15)
coord = "H" + num_ligne
a = Range(coord).Value + "7"
If a < ("=TODAY()") Then
Sheets("Archives").Select
Range("A" + num_ligne) = "yes"
Else
Sheets("Archives").Select
Range("A" + num_ligne) = "no"
End If
num_ligne = num_ligne + 1
Loop