Hoppa till huvudinnehåll

Hur byter jag snabbt innehåll i två celler i Excel?

När vi hanterar ett kalkylblad kan vi behöva byta innehållet i två celler ibland. Normalt vet de flesta av oss bara "att klippa, klistra in och kopiera" för att byta innehåll, men det är tidskrävande. Vi ska prata om hur man snabbt byter innehåll i celler i Excel.

Byt två angränsande cellinnehåll manuellt
Byt två icke intilliggande cellinnehåll med VBA-kod
Byt enkelt två slumpmässiga cellinnehåll med bara flera klick


Byt två angränsande cellinnehåll manuellt

Ibland finns det två angränsande celler som måste bytas ut. Vi kan göra det manuellt enkelt. Titta på följande skärmdump, jag vill byta cell A4 och B4, gör så här:

doc-swap-celler1

1. Välj cellen du vill byta. I det här exemplet väljer du cell A4.

2. Tryck shift och placera markören vid höger kant.

3. Dra sedan markören till den högra kanten av cell B4.

4. När det visas “”, Släpp musen.

5. Och de två cellinnehållen har bytts ut. Se skärmdump:

doc-swap-celler2

Med den här metoden kan vi också byta två angränsande rader eller kolumner.

Byt snabbt innehåll i två celler eller intervall i Excel:

Kutools för Excel's Byt intervall verktyget hjälper dig att enkelt byta ut två angivna celler eller intervall på en gång i Excel som nedanstående demo visas.
Ladda ner och prova nu! (30 dagars gratis spår)

byta celler 1


Byt två icke intilliggande cellinnehåll med VBA-kod

När de två cellerna inte ligger intill varandra fungerar inte metoden ovan. Vi kan byta dem med VBA-kod.

1. tryck på ctrl och välj de två icke angränsande cellerna du vill byta.

2. Klicka Utvecklare>Visual Basic, en ny Microsoft Visual Basic för applikationer fönstret visas, klicka Insert>Modulernaoch mata in följande kod i Modulerna:

Sub SwapTwoRange()
'Updateby20131120
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub

3. Klicka sedan doc-multiplicera-beräkning-3 för att köra koden, sedan visas en dialogruta där du kan välja de två cellerna du vill växla mellan. Se skärmdumpar:

doc swap-intervall1

4. klick Ok i popup-dialogrutan byts de två markerade cellerna ut. Se skärmdumpar:

doc swap-intervall1

Anmärkningar: Denna VBA-kod kan inte byta formatering av de två cellerna.


Byt enkelt två slumpmässiga cellinnehåll med bara flera klick

Med Kutools för Excel's Byt intervall verktyget, vi kan inte bara byta två angränsande celler, rader eller kolumner utan också enkelt byta två icke angränsande celler, rader eller kolumner.

Innan du ansöker Kutools för ExcelBer ladda ner och installera det först.

1. klick Kutools > Mätområde > Byt intervall, se skärmdump:

2. I Byt intervall dialogrutan måste du:

  • (1) klicka på den första doc-ersätt-intervall-namn-7 knapp i Byt intervall 1 rutan för att välja de celler som du vill byta.
  • (2) klicka på den andra doc-ersätt-intervall-namn-7 knappen från Byt intervall 2 rutan för att välja cellerna du ska byta med.
    tips: Du kan välja de två områdena innan du tillämpar funktionen, då kan du se de valda två områdena visas i rutorna Swap Range 1 och Swap Range 2 separat.
  • (3) Klicka på OK knapp.

Sedan byts två valda celler eller intervall omedelbart. Se skärmdumpar:

doc swap-intervall1

  Om du vill ha en gratis provperiod (30 dagar) av det här verktyget, klicka för att ladda ner den, och gå sedan till för att tillämpa operationen enligt ovanstående steg.


Demo: Byt två slumpmässiga cellinnehåll med Kutools för Excel


Relaterad artikel:

Bästa kontorsproduktivitetsverktyg

Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50 + Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

kte-flik 201905


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
Comments (12)
Rated 2.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
The vba is pants because it loses formulas and formatting. It's incredible that Excel has been through like about 25 different versions and STILL doesn't have the facility in it natively to swap two ranges/non-adjacent cells around. Sort it out Microsoft!
Rated 2.5 out of 5
This comment was minimized by the moderator on the site
Legyenszíves Megírni melyik az a müszak gomb.
Köszönöm Üdv Ádám
This comment was minimized by the moderator on the site
this isn't working for me. I don't know why
This comment was minimized by the moderator on the site
Koje njesra... na kraju cu ipak raditi copy paste... Umesto da su ubacili swap opciju na padajucem menju....
This comment was minimized by the moderator on the site
Cool trick that saved me a lot of time. Thank you!
This comment was minimized by the moderator on the site
First option work well for me thanks for your efforts... :-)
This comment was minimized by the moderator on the site
Thanks !! works perfectly for me..
This comment was minimized by the moderator on the site
Thanks !! works perfectly for me..
This comment was minimized by the moderator on the site
Thank you for the information!!!
This comment was minimized by the moderator on the site
You could just cut (non-adjacent) Cell A into an unoccupied cell, paste required cell B into that space then put A into the cell B formerly occupied couldn't you?
This comment was minimized by the moderator on the site
It's not as simple as you suggested when cells have formula in them. And this also helps in inserting multiple cells at any desired location as well.
This comment was minimized by the moderator on the site
Yes you could, but why go such a roundabout way when you can do it much faster this way. Thanks ExtendOffice for your good work.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations