Transposer plusieurs lignes en une seule colonne [Résolu/Fermé]

Signaler
Messages postés
125
Date d'inscription
lundi 9 septembre 2013
Statut
Membre
Dernière intervention
13 juin 2017
-
Messages postés
125
Date d'inscription
lundi 9 septembre 2013
Statut
Membre
Dernière intervention
13 juin 2017
-
Bonjour,
je suis débutante en vba,je souhaite créer une macro qui me permet de transposer plusieurs lignes en une seule colonne qui se trouve dans la deuxième feuille de mon classeure .
j'ai essayé avec le code suivant,mais il ne m'a pas donner les résultats souhaitées
Dim i As Integer, j As Integer
j = 0
For i = 0 To Cells(Rows.Count, 12).End(xlUp).Row - 1
Sheets("f1").Select
Range("H2:K2").Offset(i).Select
Selection.Copy
Sheets("f2").Select
Range("A8").Offset(j).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Application.CutCopyMode = False


j = j + 1
Next i


merci de m'aidez s'il vous plait

1 réponse

Messages postés
9627
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
17 novembre 2020
1 959
Bonjour

un exemple
http://www.cjoint.com/c/FGup6eLs32d

Cdlmnt
Messages postés
125
Date d'inscription
lundi 9 septembre 2013
Statut
Membre
Dernière intervention
13 juin 2017
1
Je vous remercie pour votre réponse rapide ! c'est résolu .