Легко поєднуйте декілька аркушів / книг в єдиний аркуш / книгу

За допомогою наступного коду VBA ви можете легко створити список із зазначених комірок на декількох робочих аркушах. Ви можете зробити наступне:

Крок 1: Виберіть вказану комірку, з якої ви будете створювати свій список. У нашому випадку ми вибираємо комірку E6.

Крок 2: натисніть інший + F11 клавіші одночасно, щоб відкрити вікно Microsoft Visual Basic for Applications, клацніть Insert > Модулі, а потім вставте наступний код у вікно модуля.

VBA: Створіть список з тих самих комірок на декількох аркушах

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

Крок 3: натисніть F5 або клацніть на прогін для запуску цього VBA.

Потім усі значення із зазначеної комірки на всіх аркушах копіюються на новий аркуш із назвою KutoolsforExcel. Див. Знімок екрана:

Цей VBA заповнить список на новому аркуші, а значення в списку статичні, що не зміниться з початковими значеннями.

Однак іноді вам може знадобитися заповнити список у зазначений діапазон і вимагати, щоб значення списку постійно відповідали вихідним значенням у зазначених клітинках. Для задоволення цих потреб слід спробувати наступний спосіб.

Цей метод введе Kutools для ExcelАвтора Динамічно звертайтесь до робочих аркушів утиліта для створення динамічного списку з тих самих комірок на декількох робочих аркушах.

Крок 1: Виберіть діапазон, де ви будете заповнювати динамічний список, і натисніть на Кутулс > більше > Динамічно звертайтесь до робочих аркушів.

Крок 2: у діалоговому вікні Заповнити посилання на робочі аркуші,

(1) Клацніть на Заповніть замовлення і виберіть тип заповнення зі спадного списку. У нашому випадку ми обираємо Заповнюйте вертикально клітинку за коміркою;

(2) В Формула заповнення вкажіть адресу комірки, з якої ви будете створювати динамічний список, а потім клацніть на Lock button  щоб заблокувати формулу.

(3) Клацніть на Діапазон заповнення кнопки.

Тепер ви побачите, що значення у вказаних клітинках на всіх робочих аркушах заповнюються у зазначений діапазон, як показано на знімку екрана нижче:

Коли початкові значення зміняться, відповідні значення в цьому зазначеному списку будуть автоматично змінені.

Як автоматично заповнити одну і ту ж комірку з різних аркушів на аркуші в Excel?