1. Location:
  2. / Computer learning >> Datamaskin læring >> Kontor-Programvare >> Microsoft excel >> excel Komplekset >>

Hvordan lage en liste fra samme cellene på tvers av flere ark i Excel?

Med følgende VBA-kode, kan du lage en liste fra de angitte celler på tvers av flere regneark enkelt. Du kan gjøre som følger:

Trinn 1: Velg den spesifiserte cellen du vil skape din liste fra. I vårt tilfelle, velger vi Cell E6

Trinn 2:. Trykk Alt + F11 samtidig for å åpne Microsoft Visual Basic for Applications-vinduet, klikk Sett > Modul, og deretter lime inn følgende kode i modulen vinduet

VBA. Lag en liste fra samme cellene på tvers av flere ark
Sub CreateList () Dim xAddWs Som WorksheetDim xWs Som WorksheetDim RngAddress Som StringxTitleId = "KutoolsforExcel "RngAddress = Application.ActiveCell.AddressSet xAddWs = Application.ActiveWorkbook.Sheets.AddxAddWs.Name = xTitleIdi = 1 For hver xWs I Application.ActiveWorkbook.WorksheetsIf xWs.Name < > xTitleId ThenxAddWs.Cells (i, 1) .Value = xWs.Range (RngAddress) .Valuei = i + 1End IfNextEnd Sub

Trinn 3:. Trykk F5 eller klikk på knappen Kjør for å kjøre denne VBA

Så alle verdier fra den spesifiserte cellen på alle regnearkene er kopiert til et nytt regneark heter KutoolsforExcel. Se skjermbilde:


Dette VBA vil fylle opp listen i et nytt regneark, og verdiene i listen er statiske som ikke vil forandre seg med de opprinnelige verdiene
Men noen ganger kan det være lurt å fylle opp listen i angitte området, og krever listeverdiene alltid være korrespondanse med de opprinnelige verdiene i spesifiserte celler hele tiden. For å møte disse behovene, bør du prøve følgende metode.

Opprett en dynamisk liste fra samme cellene på tvers av flere ark med Kutools for Excel

Denne metoden vil innføre Kutools for Excel Dynamisk Se regneark verktøyet å skape en dynamisk liste fra samme cellene på tvers av flere regneark.

Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Les mer Gratis nedlasting nå

Trinn 1: Velg Range hvor du vil fylle den dynamiske listen, og klikk på Kutools > Mer > Dynamisk Se regneark

Trinn 2:. I åpnings Fyll Regneark Referanser dialogboksen, etter


(1) Klikk på Fill Bestill boksen, og velg en fylltype fra nedtrekkslisten. I vårt tilfelle, velger vi Fyll Vertikalt celle etter celle;

(2) i fyll formel boksen endrer celleadressen til den angitte celleadressen som du vil skape en dynamisk liste fra, og klikk deretter på Lås knappen for å låse formelen.

(3) Klikk på Fill Range knappen.

Nå vil du se verdiene i de angitte cellene på tvers av alle regneark er fylt inn det angitte området som nedenfor skjermbilde vist .:


Når de opprinnelige verdiene endret seg, de tilsvarende verdiene i dette spesifisert liste vil bli endret automatisk

Gratis Last ned Kutools for Excel Nå