Transposer en ligne de 5 en 5 cellules

Chewiki

XLDnaute Nouveau
Bonjour,
Je suis en train d'organiser des données d'un fichier csv pour qu'elles soient lisibles (et semblables aux données des autres fichiers csv).
Pour l'instant j'ai réussi à me débrouiller pour le début mais je bloque pour transposer en ligne de 5 en 5 cellules de la colonne F.

Je pense avoir la bonne formule pour les 5 premières valeurs, mais c'est pour faire une boucle que ça coince (en sachant que la quantité de données peut varier d'un fichier à un autre) :

Range("F1:F5").Select
Selection.Copy
Range("G1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True

Du coup, je m'en remet à vous, Ô Grands Jedis de VBA pour un petit coup de pouce.
Merci d'avance
 

Pièces jointes

  • Testformule.xlsx
    16.4 KB · Affichages: 1

Discussions similaires

Statistiques des forums

Discussions
315 088
Messages
2 116 089
Membres
112 658
dernier inscrit
doro 76