Note: The other languages of the website are Google-translated. Back to English
Logga in  \/ 
x
or
x
Registrera  \/ 
x

or

Hur kopierar jag flera val eller intervall i Excel?

Till exempel har du ett stort kalkylblad och nu vill du bara kopiera några utvalda områden och distribuera till andra kalkylblad. Men när du väljer flera intervall och klickar på kopiera kommer det att finnas en dialogruta för att påminna dig "Det kommandot kan inte användas i flera val." I det här tillståndet, hur kopierar du snabbt flera valda områden? Här är några knep för att lösa denna uppgift.


Kopiera flera valda områden med Urklipp

Med hjälp av Urklippkan du klistra in alla valda områden i ett annat intervall eller kalkylblad åt gången. Gör så här:

1. Klicka Hem > Dok kopiera flera intervall 09 i Urklipp grupp för att visa Urklipp Pane.. Se skärmdump:

2. Kopiera sedan de valda intervallen som du behöver en efter en. Samtidigt har de kopierade områdena dykt upp i Urklipp Pane. se skärmdump ovan:

3. Välj den första cellen i destinationsområdet som du klistrar in alla kopierade områden till och klicka Klistra in alla knapp i Urklipp Ruta.

Och sedan har alla kopierade områden klistrats in i det angivna destinationsområdet.

Kombinera enkelt flera val från många kalkylblad / arbetsböcker i ett kalkylblad / arbetsbok

Det kan vara tråkigt att kombinera dussintals ark från olika arbetsböcker till ett ark. Men med Kutools för Excel Kombinera (kalkylblad och arbetsböcker) verktyget kan du få det gjort med bara några klick! Fullversion gratis provperiod 30 dagar!
annons kombinera ark böcker 1

Kutools för Excel - Innehåller mer än 300 praktiska verktyg för Excel. Fullversion gratis provperiod 30 dagar, inget kreditkort krävs! Hämta den nu

Kopiera flera valda områden med VBA-kod

Med VBA-kod kan du också kopiera flera valda områden och klistra in dem i något annat kalkylblad.

1. Håller ctrl och välj flera icke intilliggande områden som du vill använda.

2. Tryck andra + F11 tangenter samtidigt för att öppna Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulernaoch mata in följande kod i modulen:

Alternativ Explicit Sub CopyMultipleSelection () Dim SelAreas () As Range Dim PasteRange As Range Dim UpperLever As Range Dim NumAreas As Integer, i As Integer Dim TopRow As Long, LeftCol As Integer Dim RowOffset As Long, ColOffset As Integer Dim NonEmptyCellCount As Ingerger 'Exit om ett intervall inte är valt Om TypeName (Selection) <> "Range" Then MsgBox "Välj det intervall som ska kopieras. Ett flerval är tillåtet." Exit Sub End Om 'Lagra områdena som separata Range-objekt NumAreas = Selection.Areas.Count ReDim SelAreas (1 To NumAreas) For i = 1 To NumAreas Set SelAreas (i) = Selection. Area (i) Next' Bestäm övre vänstra cell i flera val TopRow = ActiveSheet.Rows.Count LeftCol = ActiveSheet.Columns.Count For i = 1 To NumAreas If SelAreas (i) .Row <TopRow Then TopRow = SelAreas (i) .Row If SelAreas (i) .Column <LeftCol Then LeftCol = SelAreas (i). Kolumn Nästa uppsättning UpperLeft = Cells (TopRow, LeftCol) 'Hämta klistra adress Vid fel Återuppta nästa uppsättning PasteRange = Application.InputBox _ (Prompt: = "Ange den övre vänstra cellen för pastan range: ", _ Title: =" Copy Mutliple Selection ", _ Type: = 8) On Error GoTo 0 'Exit if cancelled If TypeName (PasteRange) <>" Range "Then Exit Sub' Se till att endast den övre vänstra cellen är används Set PasteRange = PasteRange.Range ("A1") 'Kontrollera klistra intervall för existerande data NonEmptyCellCount = 0 För i = 1 Till NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = Sel Områden (i) .Column - LeftCol NonEmptyCellCount = NonEmptyCellCount + _ Application.CountA (Range (PasteRange.Offset (RowOffset, ColOffset), _ PasteRange.Offset (RowOffset + SelAreas (i) .Rows.Count - 1, _ ColOffset) (i) .Columns.Count - 1))) Nästa i 'Om klistra intervallet inte är tomt, varna användaren Om NonEmptyCellCount <> 0 Då _ Om MsgBox ("Skriv över befintlig data?", vbQuestion + vbYesNo, _ "Kopiera flera val ") <> vbJa Avsluta sedan Sub 'Kopiera och klistra in varje område för i = 1 till NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = SelAreas (i). Kolumn - LeftCol SelAreas (i). Kopiera PasteRange.Offset ( RowOffset, ColOffset) Nästa i End Sub

3. Klicka sedan på run för att köra koden.

4. Och nu vänligen ange en cell för att klistra in intervallen i öppningen Kopiera flera val dialogrutan och klicka på OK knapp. Se skärmdump:


Kopiera snabbt flera valda intervall från ett kalkylblad

Vårt Kopiera flera områden nytta av Kutools för Excel kan hjälpa dig att enkelt kopiera flera intervall från det aktiva kalkylbladet snabbt. Gör så här:

Kutools för Excel - Innehåller mer än 300 praktiska verktyg för Excel. Fullversion gratis provperiod 30 dagar, inget kreditkort krävs! Hämta den nu

1. Välj de intervall du vill använda en efter en utan att hålla ned ctrl och klicka sedan på Kutools > Kopiera intervall. Se skärmdump:

2. I Kopiera flera områden dialogruta, kontrollera Alla alternativ från Klistra in speciellt avsnittet och klicka på Okej Button. Se skärmdump ovan:

Notera: Om du vill behålla radhöjden och kolumnbredden som originalintervallen, kontrollera Inklusive radhöjd alternativ och Inklusive kolonnbredd alternativ i dialogrutan Kopiera flera områden.

3. Och ange en cell för att klistra in intervallen i följande rutan och klicka på OK knapp.

Och nu klistras alla valda intervall in i den angivna cellen med samma radhöjd och kolumnbredd som de ursprungliga markeringarna.

Klicka här för mer information om Copy Multiple Ranges-verktyget       

Kutools för Excel - Innehåller mer än 300 praktiska verktyg för Excel. Fullversion gratis provperiod 30 dagar, inget kreditkort krävs! Hämta den nu


Kopiera flera intervall från många kalkylblad / arbetsböcker

Kutools för Excel ger en annan Kombinera arbetsblad verktyg för att kopiera flera intervall från många kalkylblad eller många arbetsböcker enkelt i Excel. Gör så här:

Kutools för Excel - Innehåller mer än 300 praktiska verktyg för Excel. Fullversion gratis provperiod 30 dagar, inget kreditkort krävs! Hämta den nu

1. klick Kutools Plus > Kombinera.

2. I dialogrutan Kombinera kalkylblad - Steg 1 av 3, kontrollera Kombinera flera kalkylblad från arbetsboken till ett kalkylblad alternativet och klicka på Nästa knapp.

3. I dialogrutan Kombinera kalkylblad - steg 2 av 3 gör du så här:

(1) Välj arbetsboken i Arbetsbokslista och klicka sedan på Bläddra knapp bakom varje kalkylblad för att specificera intervallet från varje kalkylblad;
(2) Klicka på Lägg till knappen för att lägga till andra arbetsböcker som du kommer att kopiera varierar från, och upprepa sedan ovan (1) för att specificera intervall i den tillagda arbetsboken.
(3) Klicka på Finish knapp.

Kutools för Excel - Innehåller mer än 300 praktiska verktyg för Excel. Fullversion gratis provperiod 30 dagar, inget kreditkort krävs! Hämta den nu

4. Sedan kommer en Kutools for excel-dialogruta ut och ber om att spara kombinationsscenariot. Klicka på Ja knapp eller Nej knappen som du behöver.

Hittills har alla angivna intervall från flera kalkylblad eller arbetsböcker kopierats och klistrats in i en ny arbetsbok.


Demo: Kopiera flera valda intervall från ett kalkylblad

Demo: Kopiera flera valda intervall från många arbetsböcker / kalkylblad


Kutools för Excel innehåller mer än 300 praktiska verktyg för Excel, gratis att prova utan begränsning på 30 dagar. Ladda ner och gratis testversion nu!

De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2019 och 365. Stöder alla språk. Enkel distribution i ditt företag eller organisation. Fullständiga funktioner 30-dagars gratis provperiod. 60-dagars pengarna tillbaka-garanti.
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 åt dig varje dag!
officetab botten
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.
  • To post as a guest, your comment is unpublished.
    peter.habershon@eis2win.co.uk · 2 years ago
    Hi there,
    Great code but wondered how I can paste values rather than just paste?
    Thanks :)
  • To post as a guest, your comment is unpublished.
    Peter Habershon · 2 years ago
    Hi there,
    Great post and the VBA code works perfectly. Is it possible to change the code to paste special > values? If so, how?
    Thanks!
  • To post as a guest, your comment is unpublished.
    jacobkring@hotmail.com · 3 years ago
    Hi. Nice code, works great. Is it possible to modify the code in a way such that it is possible to insert/paste the market row/ranges multiple times instead of just one time?
    • To post as a guest, your comment is unpublished.
      kelly.extendoffice@gmail.com · 3 years ago
      Hi Jacob,
      Maybe this Insert Title Rows feature of Kutools for Excel can solve your problem.
      https://www.extendoffice.com/product/kutools-for-excel/excel-insert-title-rows.html
  • To post as a guest, your comment is unpublished.
    kmmanahan · 3 years ago
    Hi! How do I use the same VBA Code above but instead of simply pasting, I would like it to paste special for just the values. The table I am putting the values (constants) into is already formatted and with totals (formulas)
    Thanks so much in advance!
    • To post as a guest, your comment is unpublished.
      · 3 years ago
      Hi Katrina Manahan,

      Please open the Microsoft Visual Basic for applications window, and create a new Module, just press CTRL + V to paste the VBA code directly. The sequence numbers before code won't be pasted.
  • To post as a guest, your comment is unpublished.
    Steve O · 5 years ago
    Thanks for the code, works perfectly. This odd lack of function within Excel has stumped me many times in the past. It's normally quicker in the end to work around it, but in this case I have 4000 individually colour-coded cells so any work-around would have taken a long time, so I'm very grateful.
    Steve
  • To post as a guest, your comment is unpublished.
    David Hedin · 5 years ago
    Hi,
    Is it possible to adjust the code so that the copied cells can be pasted in another sheet? Now I get the error message "400" when I attempt this. I use Office 2010.

    Also, is it possible to copy so that empty lines are deleted? I have a big document and I copy some cells with hundreds of non-copied rows between them. This makes for a rather bulky output.
  • To post as a guest, your comment is unpublished.
    Yunivor · 5 years ago
    I found that if you have the Clipboard task plane open you can copy multiple rows simply using ctrl+C and paste them in order with crtl+V using Excel 2007.
  • To post as a guest, your comment is unpublished.
    M · 6 years ago
    Thank you SOOOOOO much - what a great site
  • To post as a guest, your comment is unpublished.
    Lyn Mc · 6 years ago
    Found above explanation of options to copy multiple ranges very helpful - thanks! I used the 'clipboard' option to copy multiple rows. Had to select each group of consecutive rows and copy it, move on and select next row or group of consecutive rows and copy it, etc.. But after this its easy, go to where you want to paste them, eg a new sheet, and click 'Paste all' from the Clipboard and all the rows are copied to there with out any gaps! Exactly what I wanted - thanks again!
  • To post as a guest, your comment is unpublished.
    Abani Pattanayak · 6 years ago
    I want to select the rows like 1, 5,6,10. so how can i copy these rows ???
    • To post as a guest, your comment is unpublished.
      David Hedin · 5 years ago
      In this case you can just select the rows and copy them as usual.
      • To post as a guest, your comment is unpublished.
        K Raj · 4 years ago
        How can I copy cell a1, e5, g2, and so on.... (more than 1000 cells in same column) and paste them into b1, f5, h2 (right into the next column in same row.)