Incrémentation de dates dans des cellules non adjacentes

[s.G74]

Bonjour à vous,

Est il possible d'incrémenter des dates (comme quand on tire sur les poignées d'une cellule) dans des cellules non adjacentes ?

Exemple : A1 = samedi 1 janvier 2011 et en A20 = dimanche 2 janvier 2011, A40 = lundi 3 janvier 2011, etc...

Merci de vos réponses

Bonne journée à tous

Stéphane

 

[Pierrot93]

Re : Incrémentation de dates dans des cellules non adjacentes

Bonjour,

A1, A20, A40, n'est pas un "pas" régulier, regarde ceci si tu peux t'en inspirer :

Option Explicit
Sub test()
Dim i As Integer
For i = 21 To 100 Step 20
    Cells(i, 1) = Cells(i - 20, 1) + 1
Next i
End Sub

bon après midi
@+

 

[s.G74]

Re : Incrémentation de dates dans des cellules non adjacentes

Bonjour Pierrot93,

Merci de la réponse, ceci devrait allé, car se sera un "pas" régulier.

Merci encore

Bonne journée.