Cyfuno nifer o daflenni gwaith / llyfrau gwaith yn hawdd mewn taflen waith / llyfr gwaith sengl

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 ：

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.

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

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.

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

(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  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:

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

Sut i awtofilio'r un gell o wahanol ddalennau i ddalen yn Excel?