Designer cellule adjacente à instruction for each cell In plage

Résolu
mod77 Messages postés 1284 Date d'inscription   Statut Membre Dernière intervention   -  
mod77 Messages postés 1284 Date d'inscription   Statut Membre Dernière intervention   -
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 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

vote = Cel.Offset(0,1).value
0
mod77 Messages postés 1284 Date d'inscription   Statut Membre Dernière intervention   53
 
merci f894009 :-)
je n'y ai pas pensé du tout
0