Supposing du har tre regneark (Grade1, Grade2, Grade3) som inneholder litt informasjon av studentene, og nå må du sette dem sammen til ett regneark. Se følgende skjermbilder:
følgende VBA-kode kan hjelpe deg å få data fra alle regneark av aktive arbeidsboken sammen til en ny singel regneark. På samme tid må alle arkene har samme felt struktur, samme kolonneoverskriftene og samme kolonne rekkefølge. Gjør følgende:
1. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vinduet.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window.
Sub Kombiner () Dim J Som IntegerOn Error Resume NextSheets (1) .SelectWorksheets.AddSheets (1) .name = "Kombinert" Sheets (2) .ActivateRange (" A1 ") EntireRow.SelectSelection.Copy Destination:. = Sheets (1) .Range (" A1 ") For J = 2 Til Sheets.CountSheets (J) .ActivateRange (" A1 ") SelectSelection.CurrentRegion.SelectSelection.Offset (. 1, 0) .Resize (Selection.Rows.Count - 1) .SelectSelection.Copy Destination:. = Sheets (1) .Range ("A65536") End (xlUp) (2) NextEnd Sub3. Deretter trykker F5 for å kjøre koden, og alle data i arbeidsboken har blitt slått sammen til et nytt regneark heter Kombinert som vil legge før alle regnearkene
Merk:.
(1.) Dine data må starter fra A1, hvis ikke, vil koden ikke tre i kraft.
(2.) Dine data må ha samme struktur.
(3.) Denne koden kun kan kombinere alle regnearkene i den aktive arbeidsboken, hvis du ønsker å fusjonere regneark fra flere arbeidsbøker, vil denne koden ikke fungerer.
Merge regneark eller arbeidsbøker i ett regneark med Kutools for Excel
Kanskje ovenfor VBA-kode har noen begrensninger for deg, Kutools for Excel Kombiner verktøy kan hjelpe deg med å flette regneark fra en arbeidsbok eller flere arbeidsbøker raskt og enkelt, om de har de samme strukturene eller ikke.
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Les mer Gratis nedlasting Nå
Enn om du har to arbeidsbøker trenger å bli slått sammen, og regnearkene har ikke samme strukturene, som følgende skjermbilder vist, i dette tilfellet, Kutools for Excel Kombiner verktøyet også kan løse dette problemet.
Etter installere Kutools for Excel, kan du gjøre som følgende:
1. Klikk Enterprise > Kombiner, se skjermbilde:
to. I Kombiner Regneark veiviseren, velg Kombiner flere regneark fra arbeidsbøker i ett regneark alternativ. Se skjermbilde:
tre. Og klikk på Neste-knappen, på trinn 2 av veiviseren, er alle de åpnede arbeidsbøker og regneark oppført i listeboksene, hvis du ønsker å legge til andre arbeidsbøker eller mapper, kan du klikke knappen Legg til for å sette inn de filene du vil kombinere. Angi deretter regnearkene som du ønsker å kombinere og også du kan klikke for å velge området som du ønsker å bruke. (Som standard er det brukt spekter valgt for hvert regneark) Se skjermbilde:
4. Etter angi regneark og områder, og deretter fortsette å klikke Neste-knappen, på trinn 3 av veiviseren, gjør følgende innstillinger etter dine behov, og se skjermbilde:
5. Etter å ha fullført innstillingene, klikker du Fullfør for å kombinere regnearkene. Og du vil bli spurt om du vil lagre dette scenariet, se skjermbilde:
Hvis du ønsker å lagre dette scenariet, må du klikke Ja, og skriv inn navnet på scenariet, (se skjermbilde), og når du vil bruke dette scenariet, du bare trenger bare å klikke Scenario-knappen for å velge navnet på scenariet du trenger på trinn 2 veiviseren. Hvis du ikke ønsker å lagre dette scenariet, må du klikke No.
Og så alle de valgte regnearkene i arbeidsbøkene er slått sammen til et nytt regneark i en arbeidsbok. Regnearket informasjon er lagt før dataene. Se skjermbilde:
Hvis du ønsker å vite mer om denne funksjonen, må du klikke Kombiner flere regneark fra arbeidsbøker i én worksheetFree Last ned Kutools for Excel Nå
Relative Artikler:.
Hvordan kombinere flere arbeidsbøker til én arbeidsbok i Excel?
Hvordan kombinere regneark med samme navn i ett regneark?
Hvordan oppsummere data fra regneark /arbeidsbøker i ett regneark? Anmeldelser
Hvordan kombinere flere arbeidsbøker til én arbeidsbok i Excel?
Hvordan kombinere regneark med samme navn i ett regneark?
Hvordan oppsummere data fra regneark /arbeidsbøker i ett regneark? Anmeldelser