Bonjour à tous,
 
J'ai posé un poste sur un problème de boucle, le problème a changé, donc mes soucis aussi. Je reviens vers vous pour demander votre aide.
 
Voici ma macro,
 

 
Ce que je voudrais faire maintenant, c'est créeé une boucle pour faire la même chose, sachant qu'une même sélection contient 144 données.
 
 
Merci de votre aide

ce qui pourrais m'aider:
 
comment selectionne ton une plage dynamique dans  excel avec VBA?
 
Merci

Pour sélectionner une plage dynamique, utiliser End(xlDown) ou End(xlRight). Par exemple :
 Set rRange = Range([A1], [A1].End(xlDown))

 
Merci, j'ai essayé, mais maintenant j'ai un soucis avec la fonction copier et coller puis transposer, je comprends pas pourquoi, j'ai un message d'erreur, une idée?
Et il ne fait pas la boucle, est-elle mal programmée?
 

 
Merci de votre aide

Bonjour
Je pense que ton pb est là:
 
i = 167
j = 24
tu sélectionnes ta zone de bas en haut, et XL, il aime pas! Il faut faire une sélection de haut en bas, et de gauche à droite.

C'est mieux, mais il ne veut pas faire la boucle, est-elle mauvaise?

rectifie ça:
 'Sheets(Feuil1).Cells(x, y)
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=True
 
comme ça:
 Sheets("Feuil1" ).Cells(x, y).Select
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=True
 
 
 
Sinon ta sélection reste sur vRange.  
 
Et il vaut mieux écrire:
   While (i <= 186000)
 
car sinon, la boucle ne s'arrête QUE si différent de, mais pas si "supérieur à"

Merci, le soucis c'est qu'il ne veut pas copier les 144 chiffres suivants, il ne cesse de copier la premiere selection!
 
Argh!
 
Merci

Jje coirs comprendre d'où vient mon erreur,  
il garde la premiere selection de Vrange, mlgré que les indices aient changé. Il y at-il moyen de réinitialisé Vrange à chaque fois,
 
Ou autre solution?
 
Merci