Hoe transponeert u cellen van links naar rechts in Excel?
Wanneer u waarden typt in een Excel-werkblad, doet u dat meestal van links naar rechts. Maar soms wilt u de cellen juist van links naar rechts transponeren, zoals in de onderstaande schermafbeelding. Excel beschikt helaas niet over een ingebouwde functie om dit snel voor u op te lossen — maar in dit artikel laat ik u enkele handige trucs zien om het toch eenvoudig voor elkaar te krijgen.
Cellen van links naar rechts transponeren met VBA
Cellen van links naar rechts of van boven naar beneden transponeren met Kutools voor Excel 
Cellen van links naar rechts transponeren met VBA
Voor het snel transponeren van cellen van links naar rechts zonder formules kunt u een VBA-code gebruiken.
1. Druk op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module en plak de onderstaande code in het lege script.
VBA: Van links naar rechts transponeren
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
3. Druk op F5 om de code uit te voeren. Er verschijnt een dialoogvenster waarin u de kolomletters kunt invoeren die u wilt transponeren. Scheid de kolomletters met komma’s, zoals in de onderstaande schermafbeelding.
4. Klik op OK. De selectie is nu van links naar rechts getransponeerd.
Cellen van links naar rechts of van boven naar beneden transponeren met Kutools voor Excel
Als u Kutools voor Excel hebt geïnstalleerd, transponeert u in een handomdraai cellen van links naar rechts of van boven naar beneden met de handige hulpmiddelen ‘Keer reeks verticaal om’ en ‘Keer reeks horizontaal om’.
Na installatie van Kutools voor Excel, gaat u als volgt te werk: ()Gratis downloaden Kutools voor Excel nu!)
Selecteer de cellen die u van links naar rechts of van boven naar beneden wilt transponeren en klik op Kutools > Bereik > Keer reeks horizontaal om / Keer reeks verticaal om > Alles of Keer alleen inhoud om. Zie schermafbeeldingen:
| Keer reeks horizontaal om > Alles: |
 |
| Horizontaal spiegelen > Keer alleen inhoud om: |
 |
| Keer reeks verticaal om > Alles: | Keer reeks verticaal om > Keer alleen inhoud om: |
 |  |
Kutools voor Excel– Geef Excel een boost met meer dan 300 essentiële hulpmiddelen, waardoor uw werk sneller en eenvoudiger verloopt, en profiteer van AI-functies voor slimmere gegevensverwerking en productiviteit.Nu verkrijgen
Demo: Cellen van links naar rechts of van boven naar beneden transponeren met Kutools voor Excel
Misschien bent u ook geïnteresseerd in:
Misschien bent u ook geïnteresseerd in:- Hoe verwijst u naar getransponeerde cellen bij automatisch naar beneden of naar rechts vullen in Excel?
- Hoe transponeert en koppelt u waarden in Excel?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins