Designer cellule adjacente à instruction for each cell In plage

Résolu
mod77 Messages postés 1320 Statut Membre -  
mod77 Messages postés 1320 Statut Membre -
Bonjour,

J'ai cette boucle:


With wk1.Sheets("Scan")
For Each Cel In .Range("A2:A" & derlign)
numlign = Cel.Value
vote = Cel.(Column+1).value
Set adr = wk1.Sheets("Votes").Range("B5:B" & CStr(derlign + 5)).Find(numlign, wk1.Sheets("Votes").Range("B5"), xlValues, xlWhole, xlByRows, xlNext)

Mais je ne sais pas comment désigner la valeur de la cellule (colonne B, même ligne) à coté de celle qui est traitée dans ma boucle (colonne A).

Quelqu'un peut-il m'aider svp?




A voir également:

1 réponse

f894009 Messages postés 17413 Statut Membre 1 715
 
Bonjour,

vote = Cel.Offset(0,1).value
0
mod77 Messages postés 1320 Statut Membre 53
 
merci f894009 :-)
je n'y ai pas pensé du tout
0