Inclure une variable dans une adresse cellule

Bonjour a tous,

Je possede une variable integer = tampon
J`aimerais me deplacer dans une colonne fixe(D) en partant de cette valeur tampon et sur 10 lignes

Si tampon=3
alors je veux scruter les cellulesD3 a D10

Si tampon=15
alors je veux scruter les cellulesD15 D25

cela ressemblerai a ceci

for each cellule in range ("D"(tampon):"D"(tampon+10)
...
next

malheureusement la syntaxe est fausse!

Pourriez vous me donner un petit coup de pouce?
Merci
Alexandre

Slt, alescb
voici un exemple à adapter

Code:

---

1 2 3 4 5 6

Dim tampon As Integer, i As Long tampon = 3 ' OU tampon = ActiveCell.Row For i = tampon To tampon + 10 MsgBox Range("D" & i).Value Next i

---

A+

Re,


un autre exemple à adapter :

Code:

---

1 2 3 4 5 6 7

Dim tampon As Integer, i As Long tampon = 15   For i = 0 To 9 MsgBox Cells(i + tampon, 4).Address Next End Sub

---

Remarque : Dans l'exemple que tu donnes de D3 à D10 ça fait 8 cellules de D15 à D25, ça en fait 11..

merci merci :zoubi: