Comment transposer ou convertir des colonnes et des lignes en une seule ligne ?
Comment fusionner plusieurs lignes et colonnes en une seule ligne longue ? Cela vous semble peut-être facile, car vous pouvez les copier une par une et les assembler manuellement dans une ligne. Toutefois, cela devient long et fastidieux s’il y a des centaines de lignes et de colonnes. Je vais donc vous présenter quelques astuces rapides pour résoudre ce problème.
Transposer / Convertir des colonnes et des lignes en une seule ligne à l’aide d’une formule
Transposer / Convertir des colonnes et des lignes en une seule ligne à l’aide d’un code VBA
Transposer / Convertir des colonnes et des lignes en une seule ligne avec Kutools pour Excel
Transposer / Convertir des colonnes et des lignes en une seule ligne à l’aide d’une formule
Supposons que vous disposiez d’une plage de données comme illustré dans la capture d’écran suivante : vous pouvez transformer ces données en une seule ligne sur une nouvelle feuille de calcul à l’aide d’une formule unique.
Veuillez appliquer la formule suivante :
1. Dans une nouvelle feuille de calcul du classeur actuel, cliquez sur la cellule A1, puis copiez et collez cette formule :=DECALER(Feuil1!$A$1;((LIGNE()-1)*5)+(PLANCHER(COLONNE()-1;4)/4);(COLONNE()-1)-(PLANCHER(COLONNE()-1;4)))
Remarque : Feuil1!$A$1 correspond à la feuille de calcul et aux références de plage que vous souhaitez utiliser.
LIGNE()-1)*5 dans la formule ci-dessus, 5 représente le numéro de ligne ; et COLONNE()-1,4)/4, le 4 représente le numéro de colonne. Vous pouvez les modifier selon vos besoins.
2. Ensuite, faites glisser la poignée de recopie vers la droite jusqu’à ce que le chiffre 0 apparaisse. À ce stade, toutes les données de la plage auront été transposées en une seule ligne dans une nouvelle feuille de calcul. Voir la capture d’écran :
Transposer / Convertir des colonnes et des lignes en une seule ligne à l’aide d’un code VBA
Le code VBA suivant peut également vous aider à transformer une plage de données en une seule ligne.
1. Maintenez enfoncées les touches ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insertion > Module, puis collez le code suivant dans la fenêtre Module.
Sub TransformOneRow()
'Updateby20131120
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Ranges to be transform :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Paste to (single cell):", xTitleId, Type:=8)
Application.ScreenUpdating = False
xRows = InputRng.Rows.Count
xCols = InputRng.Columns.Count
For i = 1 To xRows
InputRng.Rows(i).Copy OutRng
Set OutRng = OutRng.Offset(0, xCols + 0)
Next
Application.ScreenUpdating = True
End Sub3. Appuyez ensuite sur la touche F5 pour exécuter le code. Une boîte de dialogue s’ouvre afin que vous sélectionniez la plage de contenu à convertir en ligne ; cliquez sur OK. Une autre boîte de dialogue apparaît pour que vous choisissiez une cellule unique où afficher le résultat. Voir les captures d’écran :
 |
 |
 |
Cliquez ensuite sur OK, et le contenu de la plage sélectionnée est converti en une ligne. Voir la capture d’écran :
 |
|
 |
Remarque : dans Set OutRng = OutRng.Offset(0; xCols + 0), vous pouvez remplacer 0 par n’importe quel nombre selon vos besoins.
Par exemple, si vous souhaitez séparer les résultats en fonction des lignes d’origine à l’aide d’une colonne d’intervalle, remplacez simplement Set OutRng = OutRng.Offset(0; xCols + 0) par Set OutRng = OutRng.Offset(0; xCols + 1). Voici les résultats obtenus :
Transposer / Convertir des colonnes et des lignes en une seule ligne avec Kutools pour Excel
Les deux méthodes précédentes peuvent paraître un peu complexes pour un utilisateur débutant d’Excel. C’est pourquoi je vous présente un outil pratique : Kutools pour Excel.
Kutools pour Excel comprend plus de 300 outils Excel pratiques. Essayez-le gratuitement et sans limitation pendant 30 jours.Téléchargez-le dès maintenant
Grâce à l’utilitaire Transformer la plage de Kutools pour Excel, vous pouvez transformer rapidement une plage en une seule ligne. Voici comment procéder :
1. Sélectionnez la plage que vous souhaitez transposer.
2. Cliquez sur Kutools > Plage > Transformer la plage.
3. Dans la boîte de dialogue Transformer la plage, sélectionnez l’option Plage vers une seule ligne. Voir la capture d’écran :
4. Cliquez ensuite sur OK, puis sélectionnez une cellule dans la boîte de dialogue qui s’ouvre pour y insérer le résultat.
5. Cliquez sur OK et les données de la plage seront transposées en une seule ligne. Voir les captures d’écran :
|
|
 |
Pour en savoir plus sur cette fonctionnalité, consultez Transformer la plage.
Articles associés:
Comment transformer une ligne en colonne dans Excel ?
Comment transposer ou convertir une seule colonne en plusieurs colonnes dans Excel ?
Comment transposer ou convertir des colonnes et des lignes en une seule colonne ?
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels