Hoe cellen van links naar rechts te transponeren in Excel?
Wanneer we waarden typen in het Excel-blad, typen we ze meestal van links naar rechts, maar in sommige gevallen wilt u misschien de cellen transponeren die van links naar rechts naar rechts naar links zijn, zoals onderstaand screenshot. Er is geen ingebouwde functie in Excel die u kan helpen om het snel op te lossen, maar in dit artikel introduceer ik enkele trucs om u een plezier te doen.
Transponeer cellen van links naar rechts met VBA
Transponeer cellen van links naar rechts of van boven naar beneden met Kutools voor Excel
Transponeer cellen van links naar rechts met VBA
Om cellen snel van links naar rechts te transponeren zonder formules, kunt u een VBA-code gebruiken.
1. druk op Alt + F11 toetsen om in te schakelen Microsoft Visual Basic voor toepassingen venster.
2. klikken Invoegen > Module, plak onderstaande code in het lege script.
VBA: transponeer van links naar rechts
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 toets om de code uit te voeren, verschijnt er een dialoogvenster waarin u de kolomletters kunt invoeren die u wilt transponeren. Scheid deze kolomletters met een komma, zoals onderstaand screenshot.
4. klikken OK. Nu is de selectie van links naar rechts getransponeerd.
Transponeer cellen van links naar rechts of van boven naar beneden met Kutools voor Excel
Als je Kutools for Excel hebt geïnstalleerd, kun je cellen snel van links naar rechts of van boven naar beneden transponeren met de hulpprogramma's Verticaal bereik omdraaien en Horizontaal bereik omdraaien zoals je nodig hebt.
Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. |
Na het installeren van Kutools voor Excel, doe het als volgt :(Gratis download Kutools voor Excel nu!)
Selecteer de cellen die u van links naar rechts of van boven naar beneden wilt transponeren en klik op Kutools > RANGE > Horizontaal bereik omdraaien/Verticaal bereik omdraaien > Alles or Draai alleen waarden om. Zie screenshots:
Horizontaal bereik omdraaien> Alles: |
Horizontaal spiegelen> Alleen waarden spiegelen: |
Verticaal bereik omdraaien> Alles: |
Verticaal bereik omdraaien> Alleen waarden omdraaien:
|
Gegevens omdraaien
U bent mogelijk geïnteresseerd in:
- Hoe referentie transponeren tijdens automatisch invullen / rechts in Excel?
- Hoe waarden transponeren en koppelen in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!