For Each pas fortiche !

[Gruick]

Bonjour, bon appetit vu l'heure

Une curiosité.
J'aimerai qu'une macro puisse me balayer une série de données nommées mais à l'envers.
Excel a une curieuse manie de commencer par babord et finir par tribord.
de Gauche à Droite, je ne voulais pas faire de politique).
J'ai essayé de nommer la liste aussi à l'envers, Excel me la remet à l'endroit.
Seule solution, nommer les cellules l'une après l'autre, limité et fastidieux, mais faisable par macro.
Bref, nommer 2 fois la série, une fois à l'endroit, une fois à l'envers.

Donc, il faudrait un for each, qui parte de la fin pour arriver au début...
J'ai pour habitude de trouver des questions que je crois impossibles à résoudre, et le miracle s'accomplie toujours, grâce au forum.🙂

A vos neurones, le mien fatigue un peu

Mercis anticipés

 

[pierrejean]

Re : For Each pas fortiche !

bonjour Gruick

peut-etre un peu artificiel !!!

 

[allegro50]

Re : For Each pas fortiche !

Bonjour Gruick, le Forum

Sans doute ca:

Sub envers()
Dim i%
Range("A5:Z5").Select
i = 26
Do Until i = 1
letter = Cells(5, i).Value
MsgBox letter
i = i - 1
Loop
End Sub

 

[allegro50]

Re : For Each pas fortiche !

Oups Pierrejean
Pas vu !

 

[pierrejean]

Re : For Each pas fortiche !

re

une autre version qui tient compte du fait qu'il pourrait y avoir des textes plutot qu'une lettre

limitée a une ligne !!

je regarde le probleme avec une plage comportant plusieurs lignes

ps: je m'amuse comme un fou !!

 

[Ti_]

Re : For Each pas fortiche !

salut
Une boucle simple à l'envers :

Dim Bcle&, Alphabet$

With Range("Alphabet")
For Bcle = .Count To 1 Step -1
Alphabet = Alphabet & .Cells(1, Bcle)
Next bcle
End With

 

[pierrejean]

Re : For Each pas fortiche !

re

et voila la version plage de plusieurs lignes

 

[Gruick]

Re : For Each pas fortiche !

Merci à vous trois,
J'ai dû aller pousser mon Caddie, d'où retard dans les regards.
Je vais tester la solution de PierreJean sur un exemple réel, les cellules peuvent contenir des mots longs, et je crains le dépassement de capacité.
Pareil pour la solution de Ti.
La solution d'Allegro se base sur une seule ligne, mais il est vrai que je n'avais pas précisé que la range pouvait être biscornue.
Je teste, je vous tiens au courant.
A plus, et un grand merci