Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

boucle sur tableau à longueur variable.

4 réponses
Avatar
philippe herault
J'ai un fichier dont le nombre de ligne =E9volue.
Je dois faire une boucle de la premiere ligne =E0 la=20
derniere. Quelle serait la syntaxe sachant que les champs=20
ne sont pas tous contigus. peut-etre avec "current region"=20
mais je ne connais pas la syntaxe.

4 réponses

Avatar
FxM
philippe herault wrote:

J'ai un fichier dont le nombre de ligne évolue.
Je dois faire une boucle de la premiere ligne à la
derniere. Quelle serait la syntaxe sachant que les champs
ne sont pas tous contigus. peut-etre avec "current region"
mais je ne connais pas la syntaxe.



Bonjour,

Tout d'abord, tu sembles être atteint (non par la limite d'âge) mais
par , vois là :
http://www.excelabo.net/mpfe/connection.htm#netiquette

puis ensuite teste :
sub test()
for ligne = 1 to range("A65536").end(xlup).row
'tes actions
next ligne
end sub

@+
FxM

Avatar
Clément Marcotte
sub onarreteou()
derniereligne = [a65536].end(xlup).row
for i = 1 to derniereligne
cells(i,1).value = i ^ i
next
end sub


"philippe herault" a écrit dans le message de
news:03dd01c35385$34468b20$
J'ai un fichier dont le nombre de ligne évolue.
Je dois faire une boucle de la premiere ligne à la
derniere. Quelle serait la syntaxe sachant que les champs
ne sont pas tous contigus. peut-etre avec "current region"
mais je ne connais pas la syntaxe.
Avatar
philippe
Merci pour ta réponse FxM
J'ai testé ta proposition et elle fonctionne bien.

Puis j'ai voulu simplifier ma macro en écrivant :
For Each Cellule In Range("A5:"B"&("A65536").End
(xlUp).Row")
Mais cette syntaxe n'est pas acceptée.

@+ Philippe

-----Message d'origine-----
philippe herault wrote:

J'ai un fichier dont le nombre de ligne évolue.
Je dois faire une boucle de la premiere ligne à la
derniere. Quelle serait la syntaxe sachant que les
champs


ne sont pas tous contigus. peut-etre avec "current
region"


mais je ne connais pas la syntaxe.



Bonjour,

Tout d'abord, tu sembles être atteint (non par la limite
d'âge) mais

par , vois là :
http://www.excelabo.net/mpfe/connection.htm#netiquette

puis ensuite teste :
sub test()
for ligne = 1 to range("A65536").end(xlup).row
'tes actions
next ligne
end sub

@+
FxM

.




Avatar
FxM
Bonsoir,

Ca devrait aller comme ça :
For Each Cellule In Range("A5:B" & range("A65536").End(xlUp).Row)


@+
FxM