Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment transposer des cellules de gauche à droite dans Excel?

Lorsque nous saisissons des valeurs dans une feuille Excel, nous les tapons généralement de gauche à droite, mais dans certains cas, vous souhaitez peut-être transposer les cellules de gauche à droite et de droite à gauche comme illustré ci-dessous. Il n'y a pas de fonctionnalité intégrée dans Excel qui peut vous aider à le résoudre rapidement, mais dans cet article, je vous présente quelques astuces pour vous rendre service.
doc transpose de gauche à droite 1

Transposez les cellules de gauche à droite avec VBA

Transposez les cellules de gauche à droite ou de haut en bas avec Kutools pour Excel bonne idée3


Transposez les cellules de gauche à droite avec VBA


Pour transposer les cellules de gauche à droite rapidement sans les formules, vous pouvez utiliser un code VBA.

1. presse Alt + F11 touches pour activer Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Module, collez le code ci-dessous dans le script vide.

VBA: Transpose de gauche à droite

Sub RearrangeColumns()
'UpdatebyExtenoffice20161125
  Dim xLng, i As Long, LastRow As Long, Letters As Variant, NewLetters As Variant
  Dim strTemp As String
 
  On Error Resume Next
    strTemp = Application.InputBox _
    (Prompt:="Enter the column you want to transpose with comma separate", _
    Title:="Kutools For Excel", Type:=2)
    For i = Len(strTemp) To 1 Step -1
       NewOrder = NewOrder + Mid(strTemp, i, 1)
    Next i

  LastRow = Cells.Find(What:="*", SearchOrder:=xlRows, _
            SearchDirection:=xlPrevious, LookIn:=xlFormulas).Row
  Letters = Split(NewOrder, ",")
  ReDim NewLetters(1 To UBound(Letters) + 1)
  Application.ScreenUpdating = False
  For xLng = 0 To UBound(Letters)
    NewLetters(xLng + 1) = Columns(Letters(xLng)).Column
  Next
  Application.ScreenUpdating = True
  Range("A1").Resize(LastRow, UBound(Letters) + 1) = _
  Application.Index(Cells, Evaluate("ROW(1:" & LastRow & ")"), NewLetters)
End Sub

doc transpose de gauche à droite 2

3. presse F5 Pour ouvrir le code, une boîte de dialogue apparaît pour vous permettre d'entrer les lettres de colonne que vous voulez transposer. S'il vous plaît séparer ces lettres de colonne avec une virgule comme ci-dessous screenshot montré.
doc transpose de gauche à droite 3

4. Cliquez OK. Maintenant, la sélection a été transposée de gauche à droite.


Transposez les cellules de gauche à droite ou de haut en bas avec Kutools pour Excel

Si vous avez installé Kutools for Excel, vous pouvez transposer rapidement les cellules de gauche à droite ou de haut en bas avec ses utilitaires Flip Vertical Range et Flip Horizontal Range selon vos besoins.

Kutools for Excel, avec plus de 120 fonctions pratiques, rend vos travaux plus faciles.

Après l'installation de Kutools pour Excel, s'il vous plaît faire comme ci-dessous :(Téléchargement gratuit Kutools for Excel maintenant!)

Sélectionnez les cellules que vous souhaitez transposer de gauche à droite ou de haut en bas, cliquez sur Kutools > étendue > Basculer la plage horizontale/Basculer la gamme verticale > Tout or Seules les valeurs de bascule. Voir les captures d'écran:
doc transpose de gauche à droite 4

Basculer la gamme horizontale> Tous:
doc transpose de gauche à droite 9
Retourner horizontalement> Valeurs de retournement seulement:
doc transpose de gauche à droite 5


Basculer la gamme verticale> Tous:
Basculer la plage verticale> Seules les valeurs de bascule:
doc transpose de gauche à droite 6
doc transpose de gauche à droite 7

flèche bleue droite bulleVous pouvez être intéressé par:



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.