Skip i'r prif gynnwys

Sut i greu rhestr o'r un celloedd ar draws sawl dalen yn Excel?

Awdur: Kelly Wedi'i Addasu Diwethaf: 2024-08-08

Gan dybio ein bod yn defnyddio pob bwrdd gwerthu misol mewn taflen waith ar wahân fel y dangosir isod y sgrin, ac mae gan bob tabl gwerthu yr un cynllun. Nawr rydyn ni am greu rhestr o'r holl werthoedd swm (Cell E6) ar draws sawl taflen waith. Sut i wneud hynny? A beth os creu rhestr ddeinamig o werthoedd swm pob taflen waith? Mae dwy ffordd i chi:

rhestrwch y celloedd smae o ddalennau lluosog

Creu rhestr o'r un celloedd ar draws sawl dalen gyda VBA

Creu rhestr ddeinamig o'r un celloedd ar draws taflenni lluosog gyda Kutools ar gyfer Excel


Creu rhestr o'r un celloedd ar draws sawl dalen gyda VBA

Gyda'r cod VBA canlynol, gallwch greu rhestr o'r celloedd penodedig ar draws sawl taflen waith yn hawdd. Gallwch wneud fel a ganlyn:

Cam 1: Dewiswch y gell benodol y byddwch chi'n creu eich rhestr ohoni. Yn ein hachos ni, rydyn ni'n dewis y Cell E6.

Cam 2: Gwasgwch Alt + F11 allweddi ar yr un pryd i agor ffenestr Microsoft Visual Basic for Applications, cliciwch Mewnosod > Modiwlau, ac yna gludwch y cod canlynol i mewn i ffenestr y modiwl.

VBA: Creu rhestr o'r un celloedd ar draws sawl dalen

Sub CreateList()
Dim xAddWs As Worksheet
Dim xWs As Worksheet
Dim RngAddress As String
xTitleId = "KutoolsforExcel"
RngAddress = Application.ActiveCell.Address
Set xAddWs = Application.ActiveWorkbook.Sheets.Add
xAddWs.Name = xTitleId
i = 1
For Each xWs In Application.ActiveWorkbook.Worksheets
If xWs.Name <> xTitleId Then
xAddWs.Cells(i, 1).Value = xWs.Range(RngAddress).Value
i = i + 1
End If
Next
End Sub

Cam 3: Gwasgwch F5 allwedd neu cliciwch y Run botwm i redeg y VBA hwn.

Yna copïir yr holl werthoedd o'r gell benodol ar bob taflen waith i daflen waith newydd o'r enw KutoolsforExcel. Gweler y sgrinlun :

cod vba i restru'r celloedd smae o dudalennau lluosog

Bydd y VBA hwn yn llenwi'r rhestr i mewn i daflen waith newydd, ac mae'r gwerthoedd yn y rhestr yn statig na fydd yn newid gyda'r gwerthoedd gwreiddiol.

Fodd bynnag, weithiau efallai y byddwch am lenwi'r rhestr i ystod benodol, a mynnu bod gwerthoedd y rhestr bob amser yn ohebiaeth â'r gwerthoedd gwreiddiol mewn celloedd penodol trwy'r amser. Er mwyn diwallu'r anghenion hyn, dylech roi cynnig ar y dull canlynol.



Creu rhestr ddeinamig o'r un celloedd ar draws taflenni lluosog gyda Kutools ar gyfer Excel

Bydd y dull hwn yn cyflwyno Kutools ar gyfer Excel'S Cyfeiriwch yn Dynamically at Daflenni Gwaith cyfleustodau i greu rhestr ddeinamig o'r un celloedd ar draws sawl taflen waith.

Kutools ar gyfer Excel - Yn llawn dros 300 o offer hanfodol ar gyfer Excel. Mwynhewch nodweddion AI rhad ac am ddim yn barhaol! Lawrlwytho nawr!

Cam 1: Dewiswch yr Ystod lle byddwch chi'n llenwi'r rhestr ddeinamig, a chliciwch ar y Kutools > Mwy > Cyfeiriwch yn Dynamically at Daflenni Gwaith.

dewiswch yr ystod i roi'r gwerthoedd
cliciwch yn ddeinamig Cyfeirio at nodwedd Taflenni Gwaith o kutools

Cam 2: Yn y blwch deialog Cyfeirio Taflenni Gwaith agoriadol,

gosodwch opsiynau yn y blwch deialog Llenwch Cyfeirnodau Taflenni Gwaith

(1) Cliciwch y Gorchymyn Llenwi blwch, a dewis math o lenwi o'r gwymplen. Yn ein hachos ni, rydyn ni'n dewis Llenwch gell yn fertigol ar ôl y gell;

(2) Yn y Llenwch fformiwla blwch, nodwch y cyfeiriad cell y byddwch chi'n creu rhestr ddeinamig ohono, ac yna cliciwch ar y Cloi botwm botwm cloi i gloi'r fformiwla.

(3) Cliciwch y Llenwch Ystod botwm.

Nawr fe welwch werthoedd yn y celloedd penodedig ar draws yr holl daflenni gwaith yn cael eu llenwi i'r ystod benodol fel y dangosir isod y sgrinlun:

gwerthoedd yn y celloedd penodedig ar draws yr holl daflenni gwaith yn cael eu llenwi

Pan newidiodd y gwerthoedd gwreiddiol, bydd y gwerthoedd cyfatebol yn y rhestr benodol hon yn cael eu newid yn awtomatig.

Kutools ar gyfer Excel - Supercharge Excel gyda dros 300 o offer hanfodol. Mwynhewch nodweddion AI rhad ac am ddim yn barhaol! Get It Now


Demo

 

Erthyglau cysylltiedig:

Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy
Defnyddiwch Kutools yn eich dewis iaith – mae'n cefnogi Saesneg, Sbaeneg, Almaeneg, Ffrangeg, Tsieinëeg, a 40+ o ieithoedd eraill!

Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser.  Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...


Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!