Discussion :

[alescb]

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

[rvtoulon]

Slt, alescb
voici un exemple à adapter

Code :

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

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+

[aalex_38]

Re,


un autre exemple à adapter :

Code :

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

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..

[alescb]

merci merci