Note: The other languages of the website are Google-translated. Back to English
Vpiši se  \/ 
x
or
x
Registracija  \/ 
x

or

Kako prenesti celice od leve proti desni v Excelu?

Ko vtipkamo vrednosti v Excelovem listu, jih ponavadi vtipkamo od leve proti desni, v nekaterih primerih pa boste morda želeli prenesti celice od leve proti desni na desno na levo, kot je prikazano spodaj. V Excelu ni vgrajene funkcije, ki bi vam lahko pomagala, da jo hitro rešite, vendar v tem članku predstavljam nekaj trikov, s katerimi vam naredite uslugo.
doc transponiraj od leve proti desni 1

Prenesite celice od leve proti desni z VBA

Prenesite celice od leve proti desni ali od zgoraj navzdol s programom Kutools za Excel dobra ideja3


Prenesite celice od leve proti desni z VBA

Če želite hitro prenesti celice od leve proti desni brez formul, lahko uporabite kodo VBA.

1. Pritisnite Alt + F11 tipke za omogočanje Microsoft Visual Basic za aplikacije okno.

2. klik Vstavi > Moduli, prilepite spodnjo kodo v prazen skript.

VBA: Prenos levo v desno

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 transponiraj od leve proti desni 2

3. Pritisnite F5 tipko za zagon kode, odpre se pogovorno okno za vnos črk stolpcev, ki jih želite prenesti. Prosimo, ločite te črke stolpcev z vejico, kot je prikazano spodaj.
doc transponiraj od leve proti desni 3

4. klik OK. Zdaj je bil izbor prestavljen od leve proti desni.


Prenesite celice od leve proti desni ali od zgoraj navzdol s programom Kutools za Excel

Če imate nameščen Kutools za Excel, lahko s svojimi pripomočki Flip Vertical Range in Flip Horizontal Range hitro prestavite celice od leve proti desni ali od zgoraj navzdol.

Kutools za Excel, z več kot 300 priročne funkcije, vam olajša delo. 

Po namestitvi Kutools za Excel, naredite spodaj :(Brezplačno prenesite Kutools za Excel zdaj!)

Izberite celice, ki jih želite prenesti, levo v desno ali gor navzdol, kliknite Kutools > Območje > Flip Horizontal Range/Navpični navpični razpon > vsi or Samo flip vrednosti. Oglejte si posnetke zaslona:
doc transponiraj od leve proti desni 4

Flip Horizontal Range> Vse:
doc transponiraj od leve proti desni 9
Flip Horizontal> Samo flip values:
doc transponiraj od leve proti desni 5

 


Preklopi navpični obseg> Vse:
Navpični obseg flip> Samo flip vrednosti:
doc transponiraj od leve proti desni 6
doc transponiraj od leve proti desni 7

puščica modri desni mehurčekMorda vas zanima:


Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

  • Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2019 in 365. Podpira vse jezike. Preprosta namestitev v vašem podjetju ali organizaciji. Vse funkcije 30-dnevnega brezplačnega preskusa. 60-dnevno jamstvo za vračilo denarja.
zavihek kte 201905

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
dno pisarniške mize
Say something here...
symbols left.
You are guest
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.