Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

Как создать список из одних и тех же ячеек на нескольких листах в Excel?

Предположим, что мы разворачиваем каждую ежемесячную таблицу продаж на отдельном листе, как показано ниже, и все таблицы продаж имеют одинаковый макет. Теперь мы хотим создать список из всех значений суммы (Cell E6) на нескольких листах. Как это сделать? А что, если создать динамический список из значений суммы для каждого листа? Для вас есть два способа:

doc создать список нескольких листов 1

Создайте список из одних и тех же ячеек на нескольких листах с помощью VBA

Создайте динамический список из одних и тех же ячеек на нескольких листах с помощью Kutools for Excel

Легко объединить несколько рабочих листов / книг в единый рабочий лист / книгу

Может быть утомительно объединять десятки листов из разных книг в один лист. Но с Kutools для Excel Комбинат (рабочие листы и рабочие книги) утилита, вы можете сделать это всего за несколько кликов! Полнофункциональная бесплатная пробная версия 60-day!

объявление объединить листы книг 1

Вкладка «Office» Включите редактирование и просмотр с вкладками в Office и упростите свою работу ...
Kutools для Excel добавляет расширенные функции 300 в Excel и повышает производительность на 80%
  • Super Formula Bar (легко редактировать несколько строк текста и формул); Чтение макета (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон ...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объединить дублирующиеся строки и сумму / среднее ... Предотвратить повторяющиеся клетки; Сравнить диапазоны ...
  • Выберите Дублировать или Уникальные строки; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих книгах; Случайный выбор ...
  • Точное копирование нескольких ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставьте маркеры, флажки и многое другое ...
  • Любить и быстро вставлять формулы, диапазоны, графики и рисунки; Шифровать ячейки с помощью пароля; Создать список рассылки и отправлять электронные письма ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев ...
  • Суперфильтр (сохранение и применение схем фильтрации к другим листам); Расширенный Сортировать по месяцу / неделе / ​​дню, частоте и многому другому; Специальный фильтр жирным шрифтом, курсив ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разбить данные на несколько листов; Пакетное конвертирование xls, xlsx и PDF ...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.

С помощью следующего кода VBA вы можете легко создать список из указанных ячеек на нескольких листах. Вы можете сделать следующее:

Шаг 1: выберите указанную ячейку, из которой будет создан ваш список. В нашем случае мы выбираем Cell E6.

Шаг 2: нажмите другой + F11 , чтобы открыть окно Microsoft Visual Basic для приложений, щелкните Вставить > модуль, а затем вставьте следующий код в окно модуля.

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. См. Снимок экрана:

doc создать список нескольких листов 2

Этот VBA заполнит список на новый рабочий лист, а значения в списке будут статическими, которые не будут меняться с исходными значениями.

Однако иногда вы можете заполнить список в указанном диапазоне и потребовать, чтобы значения списка всегда соответствовали исходным значениям в указанных ячейках все время. Чтобы удовлетворить эти потребности, вы должны попробовать следующий метод.


Этот метод будет вводить Kutools for ExcelАвтора Динамически ссылаться на рабочие листы для создания динамического списка из одних и тех же ячеек на нескольких листах.

Шаг 1: выберите диапазон, в который вы заполните динамический список, и нажмите Kutools > Еще > Динамически ссылаться на рабочие листы.

doc динамически ссылаются на листы 1

Шаг 2: В открывшемся диалоговом окне «Справочные листы заполняющих таблиц»,

doc создать список нескольких листов 5

(1) Нажмите Заполнить заказ и выберите тип заполнения из выпадающего списка. В нашем случае мы выбираем Заполнение вертикальной ячейки после ячейки;

(2) В Формула заполнения , укажите адрес ячейки, из которого вы создадите динамический список, и нажмите Блокировка кнопка для блокировки формулы.

(3) Нажмите Диапазон заполнения Кнопка.

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

Когда исходные значения изменились, соответствующие значения в указанном списке будут изменены автоматически.

Kutools for Excel - Включает в себя более удобных инструментов 300 для Excel. Полнофункциональная бесплатная пробная версия 60-day, кредитная карта не требуется! Get It Now


В этом видео, Kutools Kutools Plus вкладки добавляются Kutools for Excel, Если это необходимо, пожалуйста, нажмите для 60-дневная бесплатная пробная версия без ограничений!


  • Супер Формула Бар (легко редактировать несколько строк текста и формул); Макет чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объедините дублирующиеся строки и сумму / среднее... предотвратить повторяющиеся клетки; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения формулы ссылки; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Любимые и быстро вставляемые формулы, Диапазоны, графики и рисунки; Шифрование ячеек с паролем; Создать список рассылки и отправлять электронные письма ...
  • Извлечение текстаДобавить текст, Удалить по позиции, Удалить пространство; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев...
  • Суперфильтр (сохранить и применить схемы фильтров к другим листам); Расширенный поиск по месяцам / неделям / дням, частоте и более; Специальный фильтр жирным шрифтом, курсивом ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.
вкладка kte 201905
  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
нижняя часть офиса
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Alan Mayo · 1 years ago
    Very helpful bit of coding, saved hours of work creating a table from lots of separate data worksheets
  • To post as a guest, your comment is unpublished.
    Jeff · 3 years ago
    Thank you very much for this. Just saved me hours of work as I had to go through 200 sheets doing data input...
    One thing to note for people is to click the cell you want it to use prior to opening ip and running the macro. Scratched my head for a couple minutes as the worksheet was opening up but didn't know why the information wasn't showing