Note: The other languages of the website are Google-translated. Back to English
Log på  \/ 
x
or
x
Tilmeld  \/ 
x

or

Hvordan kopieres flere valg eller områder i Excel?

For eksempel har du et stort regneark, og nu vil du kun kopiere nogle valgte områder og distribuere til andre regneark. Men når du vælger flere områder og klikker på kopi, vil der være en hurtig dialogboks, der minder dig "Denne kommando kan ikke bruges til flere valg." Hvordan kopierer du hurtigt flere valgte områder i denne tilstand? Her er nogle tricks, du kan løse denne opgave.


Kopier flere valgte områder med udklipsholderen

Med hjælp fra Udklipsholder, kan du indsætte alle de valgte områder i et andet område eller regneark ad gangen. Gør følgende:

1. Klik Forside > dok kopi flere områder 09 i Udklipsholder gruppe for at få vist Udklipsholder Brød.. Se skærmbillede:

2. Og kopier derefter de valgte områder, som du har brug for, en efter en. Samtidig er de kopierede intervaller blevet vist i Udklipsholder Brød. se skærmbillede ovenfor:

3. Vælg den første celle i destinationsområdet, du vil indsætte alle kopierede områder til, og klik Indsæt alt knappen i Udklipsholder Rude.

Og så er alle de kopierede områder indsat i det angivne destinationsinterval.

Kombiner let flere valg fra mange regneark / projektmapper i enkelt regneark / projektmappe

Det kan være kedeligt at kombinere snesevis af ark fra forskellige projektmapper til et ark. Men med Kutools til Excel Kombiner (regneark og projektmapper) værktøj, kan du få det gjort med blot flere klik! Komplet funktion Gratis prøveperiode 30 dage!
annonce kombinere ark bøger 1

Kutools til Excel - Indeholder mere end 300 praktiske værktøjer til Excel. Fuld funktion gratis prøveperiode 30 dage, intet kreditkort krævet! Hent den nu

Kopier flere valgte områder med VBA-kode

Med VBA-kode kan du også kopiere flere valgte områder og indsætte dem i ethvert andet regneark.

1. Holding the Ctrl tasten, og vælg flere ikke-tilstødende områder, du vil bruge.

2. Trykke andre + F11 nøgler på samme tid for at åbne Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Moduler, og indtast følgende kode i modulet:

Mulighed Eksplicit UnderkopiMultipleSelection () Dim SelAreas () Som Range Dim PasteRange As Range Dim Upper Venstre As Range Dim NumAreas As Integer, i As Integer Dim TopRow As Long, LeftCol As Integer Dim Row Offset As Long, ColOffset As Integer Dim NonEmptyCellCount As Ingerger 'Exit hvis et interval ikke er valgt Hvis TypeName (Selection) <> "Range" Then MsgBox "Vælg det område, der skal kopieres. Et multiple valg er tilladt." Exit Sub End Hvis 'Gem områderne som separate Range-objekter NumAreas = Selection.Areas.Count ReDim SelAreas (1 To NumAreas) For i = 1 To NumAreas Set SelAreas (i) = Selection.Areas (i) Next' Bestem øverst til venstre celle i flere markeringer TopRow = ActiveSheet.Rows.Count LeftCol = ActiveSheet.Columns.Count For i = 1 Til NumAreas Hvis SelAreas (i). Row <TopRow Så TopRow = SelAreas (i). Row Hvis SelAreas (i). Kolonne <LeftCol Derefter LeftCol = SelAreas (i). Kolonne Næste sæt UpperLeft = Celler (TopRow, LeftCol) 'Hent pastaadressen Ved fejl Genoptag næste sæt PasteRange = Application.InputBox _ (Prompt: = "Angiv den øverste venstre celle for pastaen rækkevidde: ", _ Titel: =" Kopi af valg af flere gange ", _ Type: = 8) On Error GoTo 0 'Exit if cancelled If TypeName (PasteRange) <>" Range "derefter Exit Sub' Kontroller, at kun den øverste venstre celle er brugt Sæt PasteRange = PasteRange.Range ("A1") 'Kontroller indsætningsområde for eksisterende data NonEmptyCellCount = 0 For i = 1 Til NumAreas RowOffset = SelAreas (i). Row - TopRow ColOffset = Sel Områder (i) .Kolonne - LeftCol NonEmptyCellCount = NonEmptyCellCount + _ Application.CountA (Range (PasteRange.Offset (RowOffset, ColOffset), _ PasteRange.Offset (RowOffset + SelAreas (i). Rows.Count - 1, _ ColOffset) (i) .Columns.Count - 1))) Næste i 'Hvis pastaområdet ikke er tomt, skal du advare bruger Hvis NonEmptyCellCount <> 0 Så _ Hvis MsgBox ("Overskriv eksisterende data?", vbQuestion + vbYesNo, _ "Kopier flere valg ") <> vbJa Afslut derefter Sub 'Kopier og indsæt hvert område For i = 1 til NumAreas RowOffset = SelAreas (i). Row - TopRow ColOffset = SelAreas (i). Kolonne - LeftCol SelAreas (i). Kopier PasteRange.Offset ( RowOffset, ColOffset) Næste i Afslut sub

3. Klik derefter på Kør knappen for at køre koden.

4. Og nu bedes du angive en celle for at indsætte intervallerne i åbningen Kopier flere valg dialogboksen, og klik på OK knap. Se skærmbillede:


Kopier hurtigt flere valgte områder fra et regneark

Kopier flere områder nytte af Kutools til Excel kan hjælpe dig med let at kopiere flere områder fra det aktive regneark hurtigt. Gør følgende:

Kutools til Excel - Indeholder mere end 300 praktiske værktøjer til Excel. Fuld funktion gratis prøveperiode 30 dage, intet kreditkort krævet! Hent den nu

1. Vælg de områder, du vil bruge en efter en uden at holde nede Ctrl nøgle, og klik derefter på Kutools > Kopier områder. Se skærmbillede:

2. I Kopier flere områder dialogboks, tjek Alle mulighed fra Indsæt specielt sektion, og klik på knappen Ok button. Se skærmbillede ovenfor:

Bemærk: Hvis du vil beholde rækkehøjden og kolonnebredden som de originale intervaller, skal du kontrollere Inkl. Rækkehøjde mulighed og Inklusive kolonnebredde i dialogboksen Kopier flere områder.

3. Og angiv en celle, der skal indsætte intervallerne i følgende promptboks, og klik på OK .

Og nu indsættes alle de valgte områder i den angivne celle med samme rækkehøjde og kolonnebredde som de oprindelige valg.

Klik her for at få flere oplysninger om Copy Multiple Ranges-værktøjet       

Kutools til Excel - Indeholder mere end 300 praktiske værktøjer til Excel. Fuld funktion gratis prøveperiode 30 dage, intet kreditkort krævet! Hent den nu


Kopier flere intervaller fra mange regneark / projektmapper

Kutools til Excel giver en anden Kombiner regneark værktøj til at kopiere flere intervaller fra mange regneark eller mange projektmapper let i Excel. Gør følgende:

Kutools til Excel - Indeholder mere end 300 praktiske værktøjer til Excel. Fuld funktion gratis prøveperiode 30 dage, intet kreditkort krævet! Hent den nu

1. klik Kutools Plus > Kombiner.

2. I dialogboksen Kombiner regneark - trin 1 af 3 skal du kontrollere Kombiner flere regneark fra projektmappen til et regneark valgmulighed, og klik på knappen Næste .

3. I dialogboksen Kombiner regneark - Trin 2 af 3 skal du gøre som nedenfor:

(1) Vælg projektmappen i Liste over projektmapper sektion, og klik derefter på Gennemse knap bag hvert regneark for at specificere området fra hvert regneark;
(2) Klik på Tilføj knappen for at tilføje andre projektmapper, som du vil kopiere fra, og gentag derefter ovenfor (1) for at specificere områder i den tilføjede projektmappe.
(3) Klik på Finish .

Kutools til Excel - Indeholder mere end 300 praktiske værktøjer til Excel. Fuld funktion gratis prøveperiode 30 dage, intet kreditkort krævet! Hent den nu

4. Derefter kommer en Kutools for Excel-dialogboks ud og beder om at gemme kombinationsscenariet. Klik på Ja knappen eller Ingen knap, som du har brug for.

Indtil videre er alle specificerede intervaller fra flere regneark eller projektmapper kopieret og indsat i en ny projektmappe.


Demo: Kopier flere valgte områder fra et regneark

Demo: Kopier flere valgte intervaller fra mange projektmapper / regneark


Kutools til Excel indeholder mere end 300 praktiske værktøjer til Excel, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!

De bedste Office-produktivitetsværktøjer

Kutools til Excel løser de fleste af dine problemer og øger din produktivitet med 80%

  • Genbruge: Indsæt hurtigt komplekse formler, diagrammer og alt, hvad du har brugt før; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • Super Formula Bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
  • Flet celler / rækker / kolonner uden at miste data; Split celler indhold; Kombiner duplikerede rækker / kolonner... Forhindre duplikerede celler; Sammenlign områder...
  • Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
  • Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
  • Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
  • Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
  • Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Mere end 300 kraftfulde funktioner. Understøtter Office / Excel 2007-2019 og 365. Understøtter alle sprog. Nem implementering i din virksomhed eller organisation. Fuld funktioner 30-dages gratis prøveperiode. 60-dages pengene tilbage garanti.
kte-fane 201905

Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50% og reducerer hundredvis af museklik for dig hver dag!
officetab bund
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.)