Bonjours à tous, et à toutes,

On est tous passé par là, et mon semblant de code ci dessous vous montre le niveau actuel que j'ai sur VBA, j'aimerais donc avoir ce code en réel langage VBA:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Dim Day As Integer = 35
R= Range ("D"&Day)
While(R = aUneValeur) = True
    aUneValeur = somme( "D & Day-13" : "D&Day-2")
    Day = Day+21
    R= Range ("D"&Day)
Wend
En réponse à la lecture de ce semblant de code, j'aimerai avoir comme résultat:

Day=35
R=D35
Tant que (D35 est une Valeur de 0 à Infini) est vrai
Valeur = Somme (D22: D33)
Day= 56
R= D56
Fin du Tant que et on recommence jusqu'a que mon D"..." est vide
Bien Cordialement,