Как переименовать листы на основе значений ячеек (из списка) в Excel?
Переименование одного рабочего листа в Excel обычно выполняется щелчком правой кнопкой мыши по вкладке листа и выбором «Переименовать» в контекстном меню. Однако, если вам нужно переименовать несколько листов, используя значения из указанных ячеек, или вы хотите динамически называть лист на основе значения определенной ячейки, существует несколько методов, которые вы можете использовать. В этой статье мы проведем вас через эти техники, делая процесс простым и эффективным.
- Динамическое переименование листа на основе значения ячейки с помощью VBA
- Переименование нескольких листов на основе значений ячеек в соответствующих листах
- Переименование нескольких листов из указанного списка
Динамическое переименование листа из значения ячейки с помощью VBA
Мы можем динамически переименовать рабочий лист на основе значения определенной ячейки с помощью VBA в Excel, и вы можете сделать это следующим образом:
Шаг 1: Щелкните правой кнопкой мыши по имени листа рабочего листа, который вы хотите динамически назвать на основе значения ячейки, и выберите Просмотр кода в меню, которое появляется после щелчка правой кнопкой мыши.
Шаг 2: В открывшемся окне Microsoft Visual Basic for Applications вставьте следующий код VBA в окно модуля.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set Target = Range("A1")
If Target = "" Then Exit Sub
Application.ActiveSheet.Name = VBA.Left(Target, 31)
Exit Sub
End SubСовет: Этот код VBA динамически переименовывает рабочий лист на основе значения в ячейке A1, вы можете изменить "A1" на другие ячейки в зависимости от ваших потребностей.
Шаг 3: Сохраните код VBA и закройте окно Microsoft Visual Basic for Application.
Затем вы увидите, что имя листа динамически изменяется на основе указанного значения ячейки.
Примечания:
- Если указанная ячейка пуста, рабочий лист не будет переименован.
- Рабочий лист будет переименован каждый раз, когда вы изменяете значение в указанной ячейке.
- Если вы введете специальные символы в указанную ячейку, такие как *, появится предупреждение об ошибке.
Переименование нескольких листов на основе значений ячеек в соответствующих листах
Метод, описанный выше, позволяет переименовывать один лист за раз. Однако, используя функцию Переименования нескольких листов Kutools для Excel, вы можете быстро переименовать все или несколько листов на основе значения указанной ячейки в каждом соответствующем листе. Например, вы можете переименовать каждый лист, чтобы он соответствовал значению, найденному в ячейке A1 этого конкретного листа.
- Нажмите Kutools Plus > Лист > Переименовать листы. См. скриншот:
- В открывшемся Переименовать несколько листов диалоговом окне выполните следующие действия:
- В списке Листы отметьте листы, которые вы хотите переименовать.
- В разделе Опции переименования отметьте опцию Заменить исходное имя листа.
- В разделе Новое имя листа отметьте опцию Переименовать листы с определенной ячейкой и укажите ячейку, содержимое которой вы хотите использовать для переименования соответствующего листа.
- Нажмите кнопку Ok.
И теперь все отмеченные листы переименованы на основе указанной ячейки каждого листа. См. скриншот:
Примечание: Хотите получить доступ к функции Переименования нескольких листов? Скачайте Kutools для Excel прямо сейчас! Помимо этого, Kutools предлагает множество 300+ других функций и предоставляет 30-дневную бесплатную пробную версию. Не ждите, попробуйте прямо сегодня!
Переименование нескольких листов из указанного списка
Функция Переименования нескольких листов Kutools для Excel также поддерживает переименование нескольких листов на основе значений ячеек в указанном списке.
- Нажмите Kutools Plus > Лист > Переименовать листы.
- В открывшемся Переименовать несколько листов диалоговом окне настройте следующее:
- В списке Листы выберите листы, которые вы хотите переименовать.
- В разделе Опции переименования отметьте опцию Заменить исходное имя листа.
- В Новое имя листа разделе отметьте Из указанного диапазона опцию и нажмите кнопку
кнопку, чтобы открыть второе Переименовать несколько листов диалоговое окно (см. скриншот справа). Затем выберите список ячеек, которые вы хотите переименовать по их значениям, и нажмите кнопку OK кнопку. - Нажмите кнопку Ok, чтобы применить переименование.
кнопку, чтобы открыть второе 
Теперь вы увидите, что все отмеченные имена рабочих листов заменены значениями ячеек из указанного списка. См. скриншот ниже:
Примечание: Хотите получить доступ к функции Переименования нескольких листов? Скачайте Kutools для Excel прямо сейчас! Помимо этого, Kutools предлагает множество 300+ других функций и предоставляет 30-дневную бесплатную пробную версию. Не ждите, попробуйте прямо сегодня!
Демонстрация: именование листов на основе значений ячеек (из списка) в Excel
Связанные статьи:
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с Kutools для Excel и ощутите новую эффективность. Kutools для Excel предлагает более300 расширенных функций для повышения продуктивности и экономии времени. Щелкните здесь, чтобы получить наиболее нужную вам функцию...
Office Tab добавляет вкладочный интерфейс в Office, делая вашу работу значительно проще
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна, а не в новых окнах.
- Увеличьте свою продуктивность на50% и сократите сотни кликов мышью ежедневно!