Как переименовать листы в excel по датам

Обычно для переименования листов в Excel мы можем быстро дважды щелкнуть вкладку листа или щелкнуть правой кнопкой мыши вкладку листа, чтобы выбрать команду «Переименовать» для переименования листов. Это очень удобно, чтобы переименовать один или два листа в Excel, но если мы хотим переименовать несколько листов в рамках одной операции, как мы можем это сделать?

Использование команды Rename для переименования листов
Использование кода VBA для переименования нескольких листов
Использование удобного инструмента для удобного переименования нескольких листов


Использование команды Rename для переименования листов

Мы можем быстро переименовать листы в Excel с помощью Переименовывать команду в соответствии со следующими процедурами:

Щелкните правой кнопкой мыши вкладку листа, который вы хотите переименовать, и выберите Переименовывать из контекстного меню. Или дважды щелкните вкладку листа, чтобы переименовать лист. Затем введите новое имя и нажмите Enter ключ, чтобы переименовать его, см. снимок экрана:

С этой Переименовывать , вы можете переименовать только один лист за раз, чтобы переименовать несколько листов, повторите указанные выше операции.


Наблюдения и советы этой статьи мы подготовили на основании опыта команды Переименовать несколько листов полезности Kutools for Excel может помочь вам легко переименовать несколько листов одновременно в Excel.
Скачать сейчас! (30-дневная бесплатная трасса)


Использование кода VBA для переименования нескольких листов

Здесь я представлю вам два кода VBA для переименования нескольких листов.

1. Код VBA для одновременного переименования нескольких листов по желаемому имени.

Используя следующий код VBA, вы можете быстро переименовать все листы текущей книги с тем же префиксом в их именах листов, например: KTE-order1, KTE-order 2 и KTE-order 3…

1. Нажмите на Застройщик > Визуальный Бейсики нажмите Вставить > Модули в Приложение Microsoft Visual Basic для Windows.

2. Скопируйте и вставьте следующий код в Модули

VBA: переименуйте все листы, введя определенное имя

Sub ChangeWorkSheetName()
'Updateby20140624
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
newName = Application.InputBox("Name", xTitleId, "", Type:=2)
For i = 1 To Application.Sheets.Count
    Application.Sheets(i).Name = newName & i
Next
End Sub

3.  Нажмите документ переименовать несколько листов-4 кнопку, чтобы выполнить код, и введите желаемое имя во всплывающем диалоговом окне. см. скриншоты:

документ переименовать листы 2

4. Нажмите OK. Затем вы увидите, что все листы переименованы.

документ переименовать листы 3

2. Код VBA для переименования нескольких листов по определенному значению ячейки на каждом листе активной книги.

Используя следующий код VBA, он переименует все листы текущей книги, используя содержимое конкретной ячейки. Например, вы можете ввести имя рабочего листа в ячейку A1 всей книги, и тогда рабочий лист будет переименован в значение ячейки A1.

1.  Укажите ячейку, которая будет содержать имя рабочего листа на каждом листе, и введите в нее имя рабочего листа. В этом примере я введу имя рабочего листа в ячейку A1 на каждом листе.

2.  Нажмите Застройщик > Визуальный Бейсики нажмите Вставить > Модули в Приложение Microsoft Visual Basic Окон.

3.  Скопируйте и вставьте следующий код в модуль.

VBA: переименовать листы по определенному содержимому ячейки

Sub RenameTabs()
'Updateby20140624
 For x = 1 To Sheets.Count
 If Worksheets(x).Range("A1").Value <> "" Then
 Sheets(x).Name = Worksheets(x).Range("A1").Value
 End If
 Next
 End Sub

4.  Нажмите документ переименовать несколько листов-4 кнопку для выполнения кода. Все рабочие листы переименовываются на основе содержимого ячеек A1.

Ноты:

1. В приведенном выше коде A1 — это содержимое ячейки, на основе которого вы хотите переименовать рабочие листы, вы можете изменить его по своему усмотрению

2. Если конкретная ячейка не имеет содержимого, то рабочий лист этой ячейки не будет переименован.


Использование удобного инструмента для удобного переименования нескольких листов

Наблюдения и советы этой статьи мы подготовили на основании опыта команды Переименовать несколько листов инструмент Kutools for Excel очень удобен для переименования всех листов или выбранных конкретных листов текущей книги.

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

1. Переименуйте несколько рабочих листов с определенными данными, используя Kutools for Excel

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

1.  Нажмите Кутулс Плюс > Рабочий лист > Переименовать листы. Смотрите скриншот:

2. Задайте настройки в Переименовать несколько листов диалоговое окно. Смотрите скриншот:

документ переименовать листы 5

1. Выберите листы, которые вы хотите переименовать, из Worksheets .

2. Выберите один тип, листы которого вы хотите переименовать в Параметры переименования.

3. Введите конкретное значение в Из поля ввода.

3. Затем нажмите OK. Вы получите следующие результаты:

документ переименовать листы 6

2. Переименуйте несколько рабочих листов со значениями ячеек, используя Kutools for Excel

Если у вас есть диапазон значений ячеек, и теперь вам нужно переименовать имя рабочего листа со значениями ячеек, эта утилита также может помочь вам быстро переименовать несколько листов с определенными значениями ячеек. Пожалуйста, сделайте так:

1. Примените эту утилиту, нажав Предприятие > Рабочий лист > Переименовать несколько листов . И в Переименовать несколько листов диалоговом окне укажите следующие параметры:

документ переименовать листы 7

1. Выберите листы, которые вы хотите переименовать, из Worksheets .

2. Выберите один тип, листы которого вы хотите переименовать в Параметры переименования.

3. Нажмите  кнопка документа кнопку, чтобы выбрать значения ячеек, которые вы хотите назвать листы на основе под Из определенного диапазона .

3.  Затем нажмите OK. Вы получите следующий результат:

документ переименовать листы 8

3. Переименуйте несколько рабочих листов с определенным значением ячейки на каждом листе, используя Kutools for Excel

Чтобы переименовать рабочий лист с определенным значением ячейки на каждом листе, Kutools for Excel‘s Переименовать несколько листов также могу оказать вам услугу, пожалуйста, сделайте следующее:

1. Примените эту утилиту, нажав Предприятие > Рабочий лист > Переименовать несколько листов . И в Переименовать несколько листов диалоговом окне укажите следующие параметры:

документ переименовать листы 9

1. Выберите листы, которые вы хотите переименовать, из Worksheets .

2. Выберите один тип, листы которого вы хотите переименовать в Параметры переименования.

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

2. Затем нажмите Ok кнопки, имена рабочих листов были переименованы с конкретным значением ячейки на каждом листе, см. снимок экрана:

документ переименовать листы 10

  Если вы хотите получить бесплатную пробную версию (30-день) этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.


Демонстрация: переименуйте несколько рабочих листов с помощью Kutools for Excel


Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

Типичная задача. Есть много листов названия которых нас не устраивают. Мы хотим их переименовать. Делать это вручную очень долго.

C надстройкой ЁXCEL это сделать легко.

Перейдите во вкладку «ЁXCEL» главного меню, нажмите кнопку «Листы», в выпавшем списке выберите пункт «Получить список листов книги»:

В открывшемся диалоговом окне установите переключатель в положение «Простой список листов (все листы)» и нажмите «ОК»:

Программа создаст в активной книге новый лист на который выведет названия всех листов:

Как быстро переименовать листы?

Исключите из списка листы, которые вы не хотите переименовывать, а напротив оставшихся введите новые названия, чтобы получилось так:

kak-bystro-pereimenovat-listy_2.png

Выделите диапазон со старыми и новыми названиями листов, перейдите во вкладку «ЁXCEL» главного меню, нажмите кнопку «Листы» и выберите команду «Переименовать листы из списка»:

kak-bystro-pereimenovat-listy_3.png

В открывшемся диалоговом окне нажмите «ОК»:

kak-bystro-pereimenovat-listy_4.png

Указанные листы будут переименованы.

Добавить комментарий

 

Rinus

Пользователь

Сообщений: 8
Регистрация: 26.04.2016

Добрый день! Помогите пожалуйста в следующем, надо чтобы лист переименовывался с из ячейки этого же листа. Т.е книга содержит 31 лист, это 31 день. В ячейках каждого листа даты. Сделать так, чтоб переименовал дату в ячейке и переименовалось название листа под дату в ячейке. Файл выложить не могу, весит более 100 кб.

 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

По какому событию переименовывать?

Хранить в отдельном листе данные одного дня в большинстве случаев неправильно.

 

Rinus

Пользователь

Сообщений: 8
Регистрация: 26.04.2016

На каждом листе данные одного дня (приход, расход, остаток материала). Да, есть связь между листами, это ссылка в ячейках остатков с предыдущего дня, также меняется дата (дата предыдущего дня +1).
Конечно можно было бы один раз переименовать листы в ручную и забыть(01.01.16; 02.01.16….31.01.16), но дело в том, что мой отчетный период к примеру с 26.02.16-25.03.16, т.е дни между месяцами выпадают(когда 31 день, а когда 28 или 30). Когда я вбиваю дату в первом листе, в остальных дата меняется, это просто, а как сделать чтоб менялись и названия листов?

 

Sanja

Пользователь

Сообщений: 14838
Регистрация: 10.01.2013

#4

04.05.2016 10:45:13

Вставьте код в модуль первого листа. При изменении значения в ячейке A1 первого (в модуле которого будет этот код) листа все листы будут переименованы на значение ячейки A1 соответствующего листа

Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, [A1]) Is Nothing And Target.Count = 1 Then
    Dim Sh As Worksheet
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
        For Each Sh In Worksheets
            Sh.Name = Sh.Range("A1").Text
        Next
    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
    End If
End Sub

Прикрепленные файлы

  • Переименовать листы.xlsm (16.37 КБ)

Изменено: Sanja04.05.2016 10:47:11

Согласие есть продукт при полном непротивлении сторон.

 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

#5

04.05.2016 10:55:32

Цитата
Rinus написал: есть связь между листами, это ссылка в ячейках

Данные правильнее хранить в одной таблице.

 

Rinus

Пользователь

Сообщений: 8
Регистрация: 26.04.2016

#6

04.05.2016 12:28:58

Цитата
vikttur написал: По какому событию переименовывать?

Извините, я не понял ваш вопрос.

 

Sanja

Пользователь

Сообщений: 14838
Регистрация: 10.01.2013

Я Вам написал макрос, который переименовывает листы, при возникновения события изменения значения в ячейке A1 первого листа.
vikttur, имел ввиду при возникновении какого события (их достаточно много в Excel) Вам нужно переименовывать листы? Или может присвоить макрос какой нибудь кнопке на листе? Или просто запускать его при нажатии определенного сочетания клавиш?

Для общего развития

Согласие есть продукт при полном непротивлении сторон.

 

Юрий М

Модератор

Сообщений: 60585
Регистрация: 14.09.2012

Контакты см. в профиле

Неплохо бы проверять, есть ли уже лист с таким именем: можем ведь получить ошибку )

 

Rinus

Пользователь

Сообщений: 8
Регистрация: 26.04.2016

Sanja, олучилось, все работает! Спасибки большие! ))). Чтоб я без вас делал? Спасибо планете EXCEL! Да уж, чем больше изучаешь, тем больше понимаешь, что ни чего не понимаешь. EXCEL- целая наука )

 

Юрий М

Модератор

Сообщений: 60585
Регистрация: 14.09.2012

Контакты см. в профиле

Rinus, кнопка цитирования не для ответа!!!

 

tigor

Пользователь

Сообщений: 17
Регистрация: 01.01.1970

А если требуется переименовать лист в текстовое значение? В имя менеджера, например. Модуль с датой в данном случае не работает.

Изменено: tigor24.09.2019 12:40:17

 

Юрий М

Модератор

Сообщений: 60585
Регистрация: 14.09.2012

Контакты см. в профиле

#12

24.09.2019 12:46:27

Всё работает: поменяйте на втором и третьем листах плюс на амперсанд,

Цитата
tigor написал:
требуется переименовать лист в текстовое значение

Имя листа всегда текст ))

 

Доброй ночи! Помогите, пожалуйста, — можно ли макрос из

#6

приспособить для переименования по следующему принципу — если в «умной» таблице на листе есть колонка «EC_CLASS_NAME», то лист переименовывается в значение из второй строки этой ячейки?
Или по имени таблицы на листе.
На каждом листе всегда одна таблица, имена таблиц не повторяются.

Желаемый результат по примеру — «лист 4» переименовывается в «ADJUSTABLE_SUPPORT», «лист 5» — в «ANGLE_GUIDE».

Прикрепленные файлы

  • Книга1.xlsx (17.57 КБ)

 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

#14

09.01.2020 03:22:07

Вопрос не по теме

Excel для Microsoft 365 Excel 2021 Excel 2019 Excel 2016 Excel 2013 Excel 2010 Excel 2007 Еще…Меньше

По умолчанию в Excel листам присваиваются названия «Лист1», «Лист2», «Лист3» и т. д., но их можно легко переименовать.

Изображение ярлычков листа Excel

Три способа переименования листа

  1. Дважды щелкните ярлычок листа и введите новое имя.

  2. Щелкните ярлычок листа правой кнопкой мыши, выберите команду Переименовать и введите новое имя.

  3. Нажмите клавиши ALT+H, O, R и введите новое имя.

Важно: 
Имена листов не могут:

  • Пустое место .

  • Содержать более 31 знака.

  • Содержать следующие символы: / ? * : [ ]

    Например, 02/17/2016 нельзя использовать в качестве имени листа, а 02-17-2016 — можно.

  • Начинаться или заканчиваться апострофом (‘), при этом апострофы использоваться между символами.

  • Называться «History». Это зарезервированное слово, которое Excel использует для внутренних целей.

Переименование книги

Если вы хотите переименовать книгу, найдите ее в проводнике, нажмите клавишу F2 или щелкните ее правой кнопкой мыши и выберите «Переименовать», а затем введите новое имя.

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

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community или попросить помощи в сообществе Answers community.

См. также

Вставка и удаление листов

Видео: перемещение и копирование листов

Краткое руководство: печать листа

Группировка листов

Защита листа

Нужна дополнительная помощь?

При создании нового документа в Эксель мы можем заметить внизу одно или несколько вкладок, которые называются листами книги. В процессе работы мы можем переключаться между ними, создавать новые, удалять ненужные и т.д. Программа автоматически присваивает листам шаблонные имена с порядковым номерами: “Лист1”, “Лист2”, “Лист3” и т.д. Когда их всего несколько, то это не так важно. Но когда приходится работать с большим количеством листов, чтобы проще было в них ориентироваться, можно их переименовать. Давайте посмотрим, каким образом это делается в Excel.

  • Переименование листа

    • Метод 1: использование контекстного меню

    • Метод 2: двойной клик по ярлыку листа

    • Метод 3: использование инструмента на ленте

  • Заключение

Переименование листа

Имя листа не может содержать больше 31 знака, но и пустым быть не должно. В нем могут использоваться буквы любого языка, цифры, пробел и символы, за исключением перечисленных далее: “?”, “/”, “”, “:”, “*”, “[]”.

Если по каким-то причинам имя будет неподходящим, Эксель не позволит завершить процесс переименования.

Теперь перейдем непосредственно к методам, пользуясь которым можно переименовать листы.

Этот способ является одним из самых популярных среди пользователей. Реализуется он следующим образом:

  1. Щелкаем правой кнопкой мыши по ярлыку листа, после чего в открывшемся контекстном меню выбираем команду “Переименовать”.Переименование листа в Excel через контекстное меню
  2. Активируется режим редактирования имени листа.Переименование листа в Эксель
  3. Вводим нужное нам название и жмем Enter, что сохранить его.Переименование листа в Excel

Метод 2: двойной клик по ярлыку листа

Несмотря на то, что описанный выше способ достаточно прост, есть еще более легкий и быстрый вариант.

  1. Дважды щелкаем по ярлыку листа левой кнопкой мыши.Запуск режима редактирования имени листа в Excel двойным кликом по его ярлыку
  2. Наименование станет активным, и мы можем приступить к его редактированию.

Метод 3: использование инструмента на ленте

Этот вариант используется значительно реже в сравнении с первыми двумя.

  1. Выбрав нужный лист во вкладке “Главная” щелкаем по кнопке “Формат” (блок инструментов “Ячейки”).Группа инструментов Формат на ленте Эксель
  2. В открывшемся списке выбираем команду “Переименовать лист”.Переименование листа через инструменты на ленте Excel
  3. Дальше вводим новое название и сохраняем его.

Примечание: Когда требуется переименовать не один, а сразу большое количество листов, можно воспользоваться специальными макросами и надстройками, которые написаны сторонними разработчиками. Но так как это вид операции нужен в редких случаях, останавливаться на нем подробно в рамках данной публикации мы не будем.

Заключение

Таким образом, разработчики программы Excel предусмотрели сразу несколько способов, пользуясь которыми можно переименовать листы в рабочей книге. Вы они предельно просты, а значит, чтобы их освоить и запомнить, нужно выполнить данные действия всего несколько раз.

Содержание:

  1. Переименование листов простым двойным щелчком
  2. Переименование листов с помощью сочетания клавиш
  3. Переименование листов с помощью параметра формата на ленте
  4. Переименование листов с помощью VBA — добавление префикса / суффикса ко всем именам листов за один раз
  5. Правила именования листов в Excel

Использование нескольких листов в книге Excel — простой способ упорядочить данные. Например, у вас могут быть разные листы для разных регионов, или для разных месяцев / года, или для разных проектов и т. Д.

А при работе с несколькими листами иногда может потребоваться изменить их имена.

В этом руководстве по Excel я покажу вам несколько простых способов переименовать лист в Excel (включая сочетание клавиш).

А если вы хотите переименовать все листы за один раз (например, добавить префикс или суффикс ко всем листам), ознакомьтесь с разделом об использовании VBA для этого (это несложно).

Итак, приступим!

Переименование листов простым двойным щелчком

С помощью мыши — самый простой способ изменить имя листа в Excel.

Ниже приведены шаги по переименованию листа с помощью двойного щелчка мышью:

  1. Наведите курсор на вкладку листа, которую хотите переименовать.
  2. Дважды щелкните по нему. Это переведет имя листа в режим редактирования
  3. Введите имя листа, который вы хотите
  4. Нажмите клавишу Enter (или щелкните в любом месте листа)

Если вы хотите переименовать несколько листов, вам необходимо проделать эти шаги для всех листов.

Кроме того, если вы хотите добавить префикс / суффикс к имени листа, используйте клавиши со стрелками для перемещения курсора, когда вы находитесь в режиме редактирования на вкладке. Когда вы наведете курсор туда, куда вы хотите добавить текст, введите его вручную.
Связанный: Увеличение нумерации вкладок Excel при создании копии

Переименование листов с помощью сочетания клавиш

Если вы предпочитаете использовать клавиатуру и не хотите переключаться на мышь только для переименования листа, вы также можете использовать следующее сочетание клавиш (для Windows).
ALT + O + H + R
Вам нужно нажимать эти клавиши по очереди.

Хотя это не одно из простых сочетаний клавиш, как только вы привыкнете к нему, вы можете найти лучший способ переименовать листы в Excel.

Совет профессионала: Если вы хотите перейти к следующему листу, вы можете использовать сочетание клавиш Ctrl + PageUp / PageDown (удерживайте клавишу Ctrl, а затем нажмите клавишу PageUP, чтобы перейти к следующему листу, или клавишу PageDown, чтобы перейти к предыдущему листу.

Переименование листов с помощью параметра формата на ленте

Вы также можете получить доступ к опции переименования листов через ленту Excel:

  1. Перейдите на вкладку «Главная»
  2. В группе «Ячейка» нажмите на опцию «Формат».
  3. Нажмите на опцию «Переименовать лист». Это переведет имя листа в режим редактирования
  4. Введите имя, которое вы хотите для листа

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

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

Переименование листов с помощью VBA — добавление префикса / суффикса ко всем именам листов за один раз

Иногда вам может потребоваться добавить префикс или суффикс ко всем листам в вашей книге.

Хотя вы можете сделать это вручную (используя методы, показанные выше), если у вас всего несколько листов. Но если у вас их много, это может быть утомительно и чревато ошибками.

В таком случае вы можете использовать простой код VBA в непосредственном окне, чтобы сделать это в мгновение ока.

Ниже приведен код VBA, который добавит префикс «2020 — ‘Перед всеми названиями листов:
Для каждого sh в листах: sh.Name = "2020 -" & sh.Name: Next sh
В приведенном выше коде используется цикл VBA (цикл For Next) для просмотра каждого листа в книге и изменения имени путем добавления указанного префикса.

Ниже приведены шаги по использованию этого макроса VBA в Excel:

  1. Щелкните правой кнопкой мыши любую вкладку листа
  2. Щелкните Просмотреть код. Это откроет серверную часть редактора Visual Basic
  3. В окне редактора VB выберите в меню опцию «Просмотр», а затем нажмите «Немедленное окно». Это приведет к немедленному отображению окна. В этом нет необходимости, если непосредственное окно уже видно. 
  4. Скопируйте и вставьте указанную выше строку кода в ближайшее окно.
  5. Поместите курсор в конец строки
  6. Нажмите клавишу Enter

Как только вы нажмете клавишу Enter, код будет выполнен, и он добавит указанный префикс во все имена листов.

Обратите внимание, что это переименует все листы — как видимые, так и скрытые.

Точно так же, если вы хотите добавить суффикс ко всем именам листов, вы можете использовать приведенный ниже код:
Для каждого sh в листах: sh.Name = sh.Name & "-2021-2022": Next sh
Вы даже можете пойти дальше и также изменить название некоторых конкретных листов (скажем, только тех, на которых появляется текст2021-2022). Это легко сделать, отредактировав код.

Правила именования листов в Excel

При переименовании листа в Excel необходимо соблюдать некоторые правила именования:

  1. Имя листа может содержать не более 31 символа.
  2. Нельзя оставлять имя листа пустым.
  3. У вас не может быть двух листов с одинаковым именем.
  4. Имя листа нельзя начинать или заканчивать апострофом (‘). Однако вы можете использовать его где-нибудь посередине в имени листа.
  5. При переименовании листа в Excel нельзя использовать следующие символы: [ ] / ? : *
    • Это означает, что у вас не может быть имени листа с датой, в которой используется косая черта. Например, 01.01.2020 не является допустимым названием листа, но 01.01.2020 является допустимым.
  6. Вы не можете назвать лист История (поскольку он используется внутри Excel)

Надеюсь, вы нашли это руководство по Excel полезным.

Вам также могут понравиться следующие советы и руководства по Excel:

  • Как показать листы в Excel (все в одном приложении)
  • Как отсортировать листы в Excel с помощью VBA (по алфавиту)
  • Объедините данные из нескольких листов в один лист в Excel
  • Как сравнить два листа Excel

Содержание

  1. Требования к именам листов
  2. Процесс переименования
  3. контекстное меню ярлыка
  4. двойной щелчок по ярлыку
  5. Как переименовать лист рабочей книги при помощи мыши?
  6. Вставка нового листа в Excel
  7. Обращение к рабочим листам
  8. Скрытие и отображение листов
  9. Описание задачи
  10. Как копировать и переименовать лист Excel макросом
  11. Перемещение/копирование листов в Excel
  12. Как сменить название листа
  13. Как изменить имя листа при помощи контекстного меню?
  14. Удаление листа в Excel

Требования к именам листов

К именам листов рабочей книги предъявляется несколько ограничений:

1) длина введенного имени не должна превышать 31-го знака;

2) имя листа не должно содержать ни одного из следующих знаков: двоеточи” ( : ), косая черта ( / ), вопросительный знак ( ? ), звездочка ( * ) и квадратные скобки ( [ ] );

3) имя не должно быть пустым.

Процесс переименования

Процедура переименования листов в Экселе в целом интуитивно понятна. Тем не менее, у некоторых пользователей, которые только начинают освоение программы, возникают определенные трудности.

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

  • В наименовании не должны присутствовать такие символы: «?», «/», «», «:», «*», «[]»;
  • Название не может быть пустым;
  • Общая длина наименования не должна превышать 31 знак.

При составлении имени листа нужно учитывать вышеуказанные правила. В обратном случае программа не даст завершить данную процедуру.

контекстное меню ярлыка

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

  1. Кликаем правой кнопкой по ярлыку, над которым хотим произвести манипуляцию. В контекстном меню выбираем пункт «Переименовать».
  2. Как видим, после этого действия поле с названием ярлыка стало активным. Просто набираем туда с клавиатуры любое подходящее по контексту наименование.
  3. Жмем на клавишу Enter. После этого листу будет присвоено новое имя.

двойной щелчок по ярлыку

Существует и более простой способ переименования. Нужно просто кликнуть двойным щелчком по нужному ярлыку, правда, в отличие от предыдущего варианта, не правой кнопкой мыши, а левой. При использовании данного способа никакого меню вызывать не нужно. Наименование ярлыка станет активным и готовым к переименованию. Вам останется только набрать нужное название с клавиатуры.

Как переименовать лист рабочей книги при помощи мыши?

Для переименования листа необходимо:

1) в окне открытой книги дважды щелкнуть левой кнопкой мыши на ярлычке нужного листа;

2) набрать нужное имя листа, соблюдая требования к листам, изложенные выше;

3) нажать клавишу Enter на клавиатуре для закрепления введенного имени.

  1. Чтобы вставить новый рабочий лист, найдите и нажмите кнопку Новый лист.
  2. Откроется новый пустой лист.

Для того чтобы изменить количество листов, открываемых по умолчанию в новой книге Excel, перейдите к представлению Backstage, нажмите Параметры, затем выберите количество листов, которые необходимо включать в каждую новую книгу.

Обращение к рабочим листам

Рабочий лист (Worksheet) принадлежит коллекции всех рабочих листов (Worksheets) книги Excel. Обратиться к листу можно как к элементу коллекции и, напрямую, по его уникальному имени.

Откройте редактор VBA и обратите внимание на вашу книгу в проводнике, где уникальные имена листов указаны без скобок, а в скобках – имена листов, отображаемые на ярлычках в открытой книге Excel. Уникальные имена листов отсортированы по алфавиту и их расположение по порядку не будет соответствовать их индексам (номерам), если листы перемещались по отношению друг к другу. Индексы листов смотрите по порядку расположения ярлычков в открытой книге. Переместили листы – изменились их индексы.

Обращение к рабочему листу в коде VBA Excel:

‘По уникальному имени

УникИмяЛиста

‘По индексу

Worksheets(N)

‘По имени листа на ярлычке

Worksheets(“Имя листа”)

  • УникИмяЛиста – уникальное имя листа, отображаемое в проводнике редактора VBA без скобок, с помощью кода VBA изменить его невозможно.
  • N – индекс листа от 1 до количества всех листов в книге, соответствует порядковому номеру ярлычка этого листа в открытой книге Excel.
  • Имя листа – имя листа, отображаемое в проводнике редактора VBA в скобках, с помощью кода VBA изменить его можно.

Количество листов в рабочей книге Excel определяется так:

‘В активной книге

Worksheets.Count

‘В любой открытой книге,

‘например, в «Книга1.xlsm»

Workbooks(“Книга1.xlsm”).Worksheets.Count

Скрытие и отображение листов

Для скрытия и отображения рабочих листов в VBA Excel используется свойство Worksheet.Visible со следующим синтаксисом:

expression.Visible

где expression – переменная, представляющая собой объект Worksheet. Свойству Worksheet.Visible могут присваиваться следующие значения:

  • False – лист становится невидимым, но он будет присутствовать в списке скрытых листов, и пользователь сможет его отобразить с помощью инструментов рабочей книги Excel.
  • xlVeryHidden – лист становится супер невидимым и его не будет в списке скрытых листов, пользователь не сможет его отобразить. Актуально для Excel 2003-2016.
  • True – лист становится видимым.

Аналоги присваиваемых значений:

  • False = xlHidden = xlSheetHidden = 1
  • xlVeryHidden = xlSheetVeryHidden = 2
  • True = xlSheetVisible = -1 (константа xlVisible вызывает ошибку)

Примеры:

Лист1.Visible = xlSheetHidden

Лист2.Visible = 1

Worksheets(Worksheets.Count).Visible = xlVeryHidden

Worksheets(“МойЛист”).Visible = True

Как создать, скопировать, переместить или удалить рабочий лист с помощью кода VBA Excel, смотрите в этой статье.

Содержание рубрики VBA Excel по тематическим разделам со ссылками на все статьи.

Описание задачи

Как правило, когда мы долго работаем с большим количеством листов, возникает потребность в их переименовании. Переименовать листы поштучно достаточно просто дважды кликнув по вкладке и введя новое название. Однако, если листов десятки, то это утомительно и отнимает время. Гораздо удобнее использовать надстройку VBA-Excel.

C помощью нее переименовать все листы в книге можно следующим образом:

  1. Нужно подготовить два списка. Первый с перечнем наименований текущих листов. Второй – с новыми наименованиями листов. Проще всего сделать два столбца в первом старые наименования и рядом список, как нужно переименовать.
  2. Перейдите на вкладку VBA-Excel (она будет доступна после установки программы).
  3. В меню Диспетчеры найдите пункт Диспетчер листов.
  4. В диспетчере выберите команду Переименовать
  5. В диалоговом окне Переименовать листы из выделенного списка укажите диапазон со старыми наименованиями листов и аналогичный диапазон, содержащий новые названия, которые должны получиться в процессе переименования.

    При необходимости можно заполнить диапазон текущими названиями листов нажав кнопку Заполнить.
  6. Нажмите кнопку Переименовать.

Как копировать и переименовать лист Excel макросом

Представьте ситуацию: Вы готовите планы работ для сотрудников определенного отдела фирмы. Пример таблицы плана выглядит так:

Руководитель этого отдела пожелал, чтобы названия листов планов работ для каждого сотрудника содержали их имена и фамилии.

Многократное копирование листов шаблона для составления и заполнения планов работ сотрудников с переименованием, потребует много времени и сил если делать все это вручную. Поэтому напишем свой макрос, который упростит данную задачу.

Техническое Задание (ТЗ) для макроса заключается в следующем. После выделения ячеек, которые содержат названия для листов нужно скопировать лист с шаблоном для планов работ ровно столько сколько будет выделенных ячеек и ввести соответствующие названия в ярлычки.

Для этого сначала откройте редактор кода макроса: «РАЗРАБОТЧИК»-«Код»-«Visual Basic» (ALT+F11):

В редакторе создайте новый модуль выбрав инструмент «Insert»-«Module» и введите в него следующий код макроса:

SubPlanRabot()
DimdiapazAsRange
DimiAs Long
DimlistAsWorksheet
On Error Resume Next
Setdiapaz = Application.InputBox("Пожалуйста, выделите диапазон ячеек, который содержит названия для новых листов!", Type:=8)
On Error GoTo0
IfdiapazIs Nothing Then Exit Sub
Setlist = ActiveSheet
Fori = 1Todiapaz.Count
list.Copy after:=ActiveSheet
ActiveSheet.Name = Left(diapaz(i), 31)
Next
End Sub

Теперь если вы хотите скопировать лист шаблона для заполнения плана работ и создать копии плана для каждого сотрудника имена с фамилиями которых будут присвоены названиям листа, то перейдите на исходный лист с шаблоном плана работ и выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Макросы»-«PlanRabot»-«Выполнить». Сразу же после запуска макроса появиться диалоговое окно:

Теперь перейдите на лист «Имена и Фамилии» и выделите в нем диапазон ячеек, которые содержат имена и фамилии сотрудников. И нажмите на кнопку ОК.

В результате чего макрос сам автоматически скопирует планы работ для каждого сотрудника и присвоит новым листам соответственные имена и фамилии.

Перемещение/копирование листов в Excel

Перемещать листы в Excel с помощью мышки очень просто: возьмите ярлычок листа и, двигаясь по горизонтали, перетащите его на новое место.

Если во время этой операции вы нажмете и будете удерживать клавишу [Ctrl], то лист… правильно, скопируется! (Вспомните, как мы копировали файлы в WINDOWS ). То же самое можно делать с группой листов.

Эту же операцию можно выполнить в Excel с помощью команды контекстного меню листа Переместить/скопировать или команды Правка/Переместить/скопировать лист . Ими особенно удобно пользоваться, если вы хотите скопировать или переместить лист в другую книгу.

Перед копированием или перемещением листа в другую книгу необходимо открыть книгу-получатель. Кроме того, в случае копирования не забудьте установить флажок в поле Создать копию . В противном случае лист просто переместится в указанное вами место.

Задание для самостоятельной работы:

В книге Мои таблицы. xls переместите лист Население Земли в конец книги, верните его на прежнее место, сделайте копию листа в этой же книге, скопируйте его в новую книгу.

Создайте пустой файл Мои таблицы-копии.xls ( для этого новую рабочую книгу сохраните под этим названием в каталоге C:ST). Скопируйте в него лист Население Земли.

Как сменить название листа

При создании новой книги Excel рабочие листы по умолчанию носят имя Лист1, Лист2 и т.д.

Как правило, листы переименовывают в более подходящие имена, в зависимости от его содержания. Это может быть и «Отчет» и «График» и т.д. Чтобы переименовать название листа, дважды кликните на ярлыке данного листа.

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

НО!

1. Название листа может содержать максимум до 31 символа, причем пробелы допускаются.

2. В названии листа нельзя прописывать следующие символы:

* (звездочка).

: (двоеточие);

/ (косая черта);

[ ] (квадратные скобки);

(кавычка);

< > угловые скобки);

? (знак вопроса);

(обратная косая черта);

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

Как изменить имя листа при помощи контекстного меню?

Чтобы переименовать лист при помощи контекстного меню, нужно:

1) в окне открытой книги один раз кликнуть правой кнопкой мыши на ярлыке нужного листа;

2) в контекстном меню выбрать пункт “Переименовать”;

3) набрать новое имя листа в соответствии с требованиями к именам листов;

4) нажать клавишу Enter на клавиатуре, чтобы закрепить новое имя.

Удаление листа в Excel

  1. Щелкните правой кнопкой мыши по ярлычку листа, который необходимо удалить, и из контекстного меню выберите пункт Удалить.
  2. Лист будет удален.

Удаление листа из рабочей книги нельзя отменить. Это одно из немногих необратимых действий в Excel. Хорошенько подумайте, прежде чем удалять их.

Если требуется ограничить изменения, которые разрешается вносить в текущий лист, Вы можете его защитить. Для этого щелкните правой кнопкой мыши по ярлычку листа и из контекстного меню выберите пункт Защитить лист.

Источники

  • http://macros-vba.ru/nadstrojki/excel/246-kak-pereimenovat-list-v-rabochej-knige-excel-pereimenovanie-listov
  • https://lumpics.ru/how-to-rename-worksheet-in-excel/
  • https://office-guru.ru/excel/pereimenovanie-vstavka-i-udalenie-lista-v-excel-24.html
  • https://vremya-ne-zhdet.ru/vba-excel/rabochiy-list-obrashcheniye-pereimenovaniye-skrytiye/
  • https://micro-solution.ru/projects/addin_vba-excel/sheets-rename
  • https://exceltable.com/vba-macros/makros-pereimenovat-listy
  • https://best-exam.ru/pereimenovanie-listov-v-excel/
  • https://zen.yandex.ru/media/topnews/urok-excel–32-kak-izmenit-nazvanie-i-cvet-iarlyka-rabochego-lista-5b2b7d5bcb0ffb00a9d43087

Содержание

  • Процесс переименования
    • Способ 1: контекстное меню ярлыка
    • Способ 2: двойной щелчок по ярлыку
    • Способ 3: кнопка на ленте
    • Способ 4: использование надстроек и макросов
  • Вопросы и ответы

Лист в Microsoft Excel

Как известно, программа Excel предоставляет возможность пользователю работать в одном документе сразу на нескольких листах. Название каждому новому элементу приложение присваивает автоматически: «Лист 1», «Лист 2» и т.д. Это не просто слишком сухо, с чем ещё можно смириться, работая с документацией, но еще и малоинформативно. Пользователь по одному наименованию не сможет определить, какие данные размещены в конкретном вложении. Поэтому актуальным становится вопрос переименования листов. Давайте разберемся, как это делается в Экселе.

Процесс переименования

Процедура переименования листов в Экселе в целом интуитивно понятна. Тем не менее, у некоторых пользователей, которые только начинают освоение программы, возникают определенные трудности.

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

  • В наименовании не должны присутствовать такие символы: «?», «/», «», «:», «*», «[]»;
  • Название не может быть пустым;
  • Общая длина наименования не должна превышать 31 знак.

При составлении имени листа нужно учитывать вышеуказанные правила. В обратном случае программа не даст завершить данную процедуру.

Способ 1: контекстное меню ярлыка

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

  1. Кликаем правой кнопкой по ярлыку, над которым хотим произвести манипуляцию. В контекстном меню выбираем пункт «Переименовать».
  2. Переход к переименованию листа в Microsoft Excel

  3. Как видим, после этого действия поле с названием ярлыка стало активным. Просто набираем туда с клавиатуры любое подходящее по контексту наименование.
  4. Поле свтало активным в Microsoft Excel

  5. Жмем на клавишу Enter. После этого листу будет присвоено новое имя.

Лист переименован в Microsoft Excel

Способ 2: двойной щелчок по ярлыку

Существует и более простой способ переименования. Нужно просто кликнуть двойным щелчком по нужному ярлыку, правда, в отличие от предыдущего варианта, не правой кнопкой мыши, а левой. При использовании данного способа никакого меню вызывать не нужно. Наименование ярлыка станет активным и готовым к переименованию. Вам останется только набрать нужное название с клавиатуры.

Ярлык готов к переименованию в Microsoft Excel

Способ 3: кнопка на ленте

Переименование можно также совершить с помощью специальной кнопки на ленте.

  1. Кликнув по ярлыку, переходим на лист, который нужно переименовать. Перемещаемся во вкладку «Главная». Жмем на кнопку «Формат», которая размещена на ленте в блоке инструментов «Ячейка». Открывается список. В нём в группе параметров «Упорядочить листы» нужно кликнуть по пункту «Переименовать лист».
  2. Переход к переименованию листа через ленту в Microsoft Excel

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

Данный способ является не столь интуитивно понятным и простым, как предыдущие. Тем не менее, его тоже используют некоторые пользователи.

Способ 4: использование надстроек и макросов

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

Lumpics.ru

Нюансы работы с различными настройками данного типа отличаются в зависимости от конкретного разработчика, но принцип действий один и тот же.

  1. Нужно в таблице Excel составить два списка: в одном перечень старых названий листов, а во втором – список наименований на которые вы хотите их заменить.
  2. Два списка в Microsoft Excel

  3. Запускаем надстройки или макрос. Вводим в отдельное поле окна надстройки координаты диапазона ячеек со старыми наименованиями, а в другое поле – с новыми. Жмем на кнопку, которая активирует переименование.
  4. Запуск группового переименования в Microsoft Excel

  5. После этого, произойдет групповое переименование листов.

Результаты группового переименования в Microsoft Excel

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

Внимание! Перед установкой макросов и расширений сторонних разработчиков убедитесь, что они загружены из проверенного источника и не содержат вредоносных элементов. Ведь они могут послужить причиной заражения системы вирусами.

Как видим, переименовать листы в программе Excel можно с помощью нескольких вариантов действий. Одни из них интуитивно понятны (контекстное меню ярлыков), другие – несколько более сложные, но тоже не содержат особенных проблем в освоении. Последнее, в первую очередь, относится к переименованию с помощью кнопки «Формат» на ленте. Кроме того, для массового переименования можно также применять макросы и надстройки сторонних разработчиков.

Еще статьи по данной теме:

Помогла ли Вам статья?

Название листа по дате + 7 дней

drugojandrew

Дата: Воскресенье, 21.10.2018, 19:15 |
Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 141


Репутация:

0

±

Замечаний:
0% ±


Excel 2013

Добрый вечер.
Пытаюсь решить такую задачу. В книге есть лист «Template» и лист с названием по дате: 2018-01-01 (год-месяц-число). Как макросом скопировать лист «Template» и переименовать, чтобы в названии прибавлялось 7 дней к дате предыдущего листа, т.е. лист с названием 2018-01-08, затем 2018-01-15 и т.д. Т.е. на каждую неделю новый лист. Пример приложил.

К сообщению приложен файл:

Primer1.xls
(29.5 Kb)

 

Ответить

RAN

Дата: Воскресенье, 21.10.2018, 19:54 |
Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 5645

И очень просто.
1. Преобразуем текст «2018-01-01» (имя листа) в дату.
2. Прибавляем к полученной дате интервал (7 дней)
3. Присваиваем новому листу имя Format((дата из п2), «yyyyy-mm-dd»)

Можно извратиться, и прибавить интервал к дню, но тот опять возникнет проблема корректной даты…


Быть или не быть, вот в чем загвоздка!

 

Ответить

drugojandrew

Дата: Воскресенье, 21.10.2018, 20:06 |
Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 141


Репутация:

0

±

Замечаний:
0% ±


Excel 2013

RAN, спасибо, попробую разобраться. В макросах не силён, но попытаюсь, может и получится чего))

 

Ответить

Kuzmich

Дата: Воскресенье, 21.10.2018, 20:13 |
Сообщение № 4

Группа: Проверенные

Ранг: Ветеран

Сообщений: 707


Репутация:

154

±

Замечаний:
0% ±


Excel 2003

[vba]

Код

Sub CopyList()
Dim iName As String
Dim iDate As Date
  iName = Worksheets(Worksheets.Count).Name
  iDate = DateSerial(Split(iName, «-«)(0), Split(iName, «-«)(1), Split(iName, «-«)(2))
  iDate = iDate + 7
    Sheets(«Template»).Copy After:=Worksheets(Worksheets.Count)
    Worksheets(Worksheets.Count).Name = Format(iDate, «yyyy-mm-dd»)
End Sub

[/vba]

 

Ответить

drugojandrew

Дата: Воскресенье, 21.10.2018, 20:23 |
Сообщение № 5

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 141


Репутация:

0

±

Замечаний:
0% ±


Excel 2013

Kuzmich, спасибо, то что нужно!!

 

Ответить

Понравилась статья? Поделить с друзьями:
  • Как переименовать листы в excel автоматически согласно списку
  • Как перейти в режим исправлений в word
  • Как переименовать лист электронной книги в excel
  • Как перейти в режим word экрана структура
  • Как переименовать лист рабочей книги в табличном процессоре excel