J'ai un range type: Range(cells(1,1), cells(57,57))
par exemple
si je fais la boucle suivante:
for each c in [range] ... ... Next c
Par quel moyen puis-je rapatrier la valeur du rang puis de la colonne de la cellule c balayée par la boucle?
J'ai essayé Row.c.value mais ça ne fonctionne pô!
ça doit être simple mais je bugge.
D'avance merci de vos conseils.
--
"Je préfère être détesté pour ce que je suis qu'être aimé p our ce que je ne suis pas" Simenon
Jacky
Bonjour,
Une façon parmi.... '----------- Sub jj() Dim i As Integer, j As Integer For i = 1 To 57 For j = 1 To 57 MsgBox Cells(j, i).Value Next Next End Sub '-------------- -- Salutations JJ
"Obéron" a écrit dans le message de news:
Bonjour,
J'ai un range type: Range(cells(1,1), cells(57,57))
par exemple
si je fais la boucle suivante:
for each c in [range] ... ... Next c
Par quel moyen puis-je rapatrier la valeur du rang puis de la colonne de la cellule c balayée par la boucle?
J'ai essayé Row.c.value mais ça ne fonctionne pô!
ça doit être simple mais je bugge.
D'avance merci de vos conseils.
--
"Je préfère être détesté pour ce que je suis qu'être aimé pour ce que je ne suis pas" Simenon
Bonjour,
Une façon parmi....
'-----------
Sub jj()
Dim i As Integer, j As Integer
For i = 1 To 57
For j = 1 To 57
MsgBox Cells(j, i).Value
Next
Next
End Sub
'--------------
--
Salutations
JJ
"Obéron" <Oberon@avalon.com> a écrit dans le message de news:
mn.a2ee7d9bc9968f3f.20021@avalon.com...
Bonjour,
J'ai un range type:
Range(cells(1,1), cells(57,57))
par exemple
si je fais la boucle suivante:
for each c in [range]
...
...
Next c
Par quel moyen puis-je rapatrier la valeur du rang puis de la colonne de
la cellule c balayée par la boucle?
J'ai essayé Row.c.value mais ça ne fonctionne pô!
ça doit être simple mais je bugge.
D'avance merci de vos conseils.
--
"Je préfère être détesté pour ce que je suis qu'être aimé pour ce que je
ne suis pas"
Simenon
Une façon parmi.... '----------- Sub jj() Dim i As Integer, j As Integer For i = 1 To 57 For j = 1 To 57 MsgBox Cells(j, i).Value Next Next End Sub '-------------- -- Salutations JJ
"Obéron" a écrit dans le message de news:
Bonjour,
J'ai un range type: Range(cells(1,1), cells(57,57))
par exemple
si je fais la boucle suivante:
for each c in [range] ... ... Next c
Par quel moyen puis-je rapatrier la valeur du rang puis de la colonne de la cellule c balayée par la boucle?
J'ai essayé Row.c.value mais ça ne fonctionne pô!
ça doit être simple mais je bugge.
D'avance merci de vos conseils.
--
"Je préfère être détesté pour ce que je suis qu'être aimé pour ce que je ne suis pas" Simenon
michdenis
Bonjour,
Je ne sais pas ce que cela signifie : "rapatrier la valeur du rang puis de la colonne"
Mais tu peux décider de quelle manière la boucle doit s'exécuter d'abord pour chacune des cellules de chacune des colonnes :
Dim Col As range, Cell As Range
For each col in Range(cells(1,1), cells(57,57)).columns for each cell in Col Msgbox "No. de la colonne: " & Cell.column & ", "" & No. Ligne : " & Cell.Row Next Next
Ou tu peux décider de boucler sur chacune des cellules des lignes For each col in Range(cells(1,1), cells(57,57)).Rows for each cell in Col Msgbox "No. de la colonne: " & Cell.column & ", "" & No. Ligne : " & Cell.Row Next Next
"Obéron" a écrit dans le message de groupe de discussion :
Bonjour,
J'ai un range type: Range(cells(1,1), cells(57,57))
par exemple
si je fais la boucle suivante:
for each c in [range] ... ... Next c
Par quel moyen puis-je rapatrier la valeur du rang puis de la colonne de la cellule c balayée par la boucle?
J'ai essayé Row.c.value mais ça ne fonctionne pô!
ça doit être simple mais je bugge.
D'avance merci de vos conseils.
--
"Je préfère être détesté pour ce que je suis qu'être aimé pour ce que je ne suis pas" Simenon
Bonjour,
Je ne sais pas ce que cela signifie :
"rapatrier la valeur du rang puis de la colonne"
Mais tu peux décider de quelle manière la boucle doit s'exécuter
d'abord pour chacune des cellules de chacune des colonnes :
Dim Col As range, Cell As Range
For each col in Range(cells(1,1), cells(57,57)).columns
for each cell in Col
Msgbox "No. de la colonne: " & Cell.column & ", "" & No. Ligne : " & Cell.Row
Next
Next
Ou tu peux décider de boucler sur chacune des cellules des lignes
For each col in Range(cells(1,1), cells(57,57)).Rows
for each cell in Col
Msgbox "No. de la colonne: " & Cell.column & ", "" & No. Ligne : " & Cell.Row
Next
Next
"Obéron" <Oberon@avalon.com> a écrit dans le message de groupe de discussion :
mn.a2ee7d9bc9968f3f.20021@avalon.com...
Bonjour,
J'ai un range type:
Range(cells(1,1), cells(57,57))
par exemple
si je fais la boucle suivante:
for each c in [range]
...
...
Next c
Par quel moyen puis-je rapatrier la valeur du rang puis de la colonne
de la cellule c balayée par la boucle?
J'ai essayé Row.c.value mais ça ne fonctionne pô!
ça doit être simple mais je bugge.
D'avance merci de vos conseils.
--
"Je préfère être détesté pour ce que je suis qu'être aimé pour ce que
je ne suis pas"
Simenon
Je ne sais pas ce que cela signifie : "rapatrier la valeur du rang puis de la colonne"
Mais tu peux décider de quelle manière la boucle doit s'exécuter d'abord pour chacune des cellules de chacune des colonnes :
Dim Col As range, Cell As Range
For each col in Range(cells(1,1), cells(57,57)).columns for each cell in Col Msgbox "No. de la colonne: " & Cell.column & ", "" & No. Ligne : " & Cell.Row Next Next
Ou tu peux décider de boucler sur chacune des cellules des lignes For each col in Range(cells(1,1), cells(57,57)).Rows for each cell in Col Msgbox "No. de la colonne: " & Cell.column & ", "" & No. Ligne : " & Cell.Row Next Next
"Obéron" a écrit dans le message de groupe de discussion :
Bonjour,
J'ai un range type: Range(cells(1,1), cells(57,57))
par exemple
si je fais la boucle suivante:
for each c in [range] ... ... Next c
Par quel moyen puis-je rapatrier la valeur du rang puis de la colonne de la cellule c balayée par la boucle?
J'ai essayé Row.c.value mais ça ne fonctionne pô!
ça doit être simple mais je bugge.
D'avance merci de vos conseils.
--
"Je préfère être détesté pour ce que je suis qu'être aimé pour ce que je ne suis pas" Simenon
Obéron
Bonsoir,
Merci à tous de vos réponses, toujours très variées, pour solutionner un problème qui n'est pas toujours simple.
Bravo à tous.
Cordialement
--
"Si on te donne une claque sur la joue droite, tend la joue gauche. Si on te donne un coup de pied au cul, ne te retourne surtout pas" Ty-Fanch' (Qui s'est encore fait avoir)
Bonsoir,
Merci à tous de vos réponses, toujours très variées, pour solutionner
un problème qui n'est pas toujours simple.
Bravo à tous.
Cordialement
--
"Si on te donne une claque sur la joue droite, tend la joue gauche. Si
on te donne un coup de pied au cul, ne te retourne surtout pas"
Ty-Fanch' (Qui s'est encore fait avoir)
Merci à tous de vos réponses, toujours très variées, pour solutionner un problème qui n'est pas toujours simple.
Bravo à tous.
Cordialement
--
"Si on te donne une claque sur la joue droite, tend la joue gauche. Si on te donne un coup de pied au cul, ne te retourne surtout pas" Ty-Fanch' (Qui s'est encore fait avoir)