Du kan inte direkt dela upp ett enda Excel -ark i flera kalkylblad i Excel själv. Du kan dock uppnå detta med hjälp av en kombination av Excels inbyggda funktioner och lite kreativ manipulation. Här är några tillvägagångssätt:
1. Använda Excel's "Text to Column" -funktion:
Den här metoden fungerar bäst om dina data har en konsekvent avgränsare (som komma, mellanslag eller flikar) som separerar de kolumner du vill dela upp i separata ark.
* Välj data: Markera hela dataintervallet du vill dela.
* Använd "Text till kolumner": Gå till data> text till kolumner .
* Välj avgränsare: Välj avgränsaren som skiljer dina data (komma, utrymme, flik etc.).
* Ange destination: I avsnittet "Destination" väljer du ett nytt kalkylblad för att placera delad data. Du kan välja ett nytt, tomt kalkylblad eller välja "Skapa nytt ark" för att automatiskt generera ett nytt.
* finish: Klicka på "Finish" och Excel skapar ett nytt kalkylblad för varje kolumn i dina originaldata.
2. Använda VBA (Visual Basic för applikationer):
Denna metod ger dig mer kontroll och flexibilitet, så att du kan dela upp data baserat på olika kriterier som specifika rader, kolumner eller värden. Det kräver emellertid grundläggande VBA -kunskap.
* Aktivera fliken Utvecklare: Gå till file> Alternativ> Anpassa band . Kontrollera rutan för "utvecklare" och klicka på "OK".
* Open VBA Editor: Gå till utvecklare> Visual Basic .
* Infoga modul: Klicka på insert> -modulen i VBA -redaktören .
* klistra kod: Klistra in följande kod i modulen och justera koden så att du passar dina specifika behov.
`` VBA
SUB SPLESHEET ()
Dim WS som kalkylblad, Newsheet som kalkylblad
Dim Lastrow så länge, jag så länge, J så länge
'Ställ in det ursprungliga kalkylbladet
Ställ in ws =thisworkbook.sheets ("Sheet1") 'Ändring "Sheet1" till ditt arknamn
'Hitta den sista raden med data
lastrow =ws.cells (rader.Count, 1) .End (xlup) .row
'Loop genom varje rad i det ursprungliga arket
För i =2 till Lastrow 'start från rad 2 till hopp över rubriken
'Skapa ett nytt kalkylblad
Ställ in NewSheet =Sheets.Add (After:=Sheets (Sheets.Count))
'Kopiera data till nytt ark
För j =1 till ws.usedRange.Columns.Count
Newsheet.cells (1, J) .Value =Ws.Cells (1, J). Value 'Copy Header
Newsheet.Cells (2, J) .Value =Ws.Cells (I, J). Value 'Copy Data
Nästa J
'Byt namn på det nya arket
Newsheet.Name ="Sheet" &i
Nästa jag
'Radera det ursprungliga arket (valfritt)
ws.delete
Slutsub
`` `
3. Använda tredjepartsverktyg:
Flera tredjeparts tillägg och verktyg kan effektivisera processen för att dela ut Excel-ark. Några populära alternativ inkluderar:
* delat ark (Tillägg tillgängligt i Microsoft Store):Tillhandahåller ett användarvänligt gränssnitt för att snabbt dela upp data baserat på olika kriterier.
* Power Query: Denna inbyggda Excel-funktion (tillgänglig i Excel 2013 och senare) kan användas för att skapa frågor som omvandlar och formar dina data, inklusive att dela upp dem i separata kalkylblad.
Viktiga överväganden:
* Dataorganisation: Metoden du väljer beror på hur dina data är organiserade. Konsekventa avgränsare är idealiska för "text till kolumner", medan VBA erbjuder mer flexibilitet för komplexa delningsscenarier.
* rubrikrad: Se till att du håller en rubrikrad i det ursprungliga arket, eftersom det kommer att kopieras till varje nytt ark.
* format: Formatering kan gå förlorad när du delar upp data, så du kan behöva applicera den igen efter delning.
Välj den metod som bäst passar dina specifika behov och datastruktur. Tveka inte att experimentera och anpassa metoderna till dina unika krav.