В Microsoft Excel преименуването на работен лист може да ви помогне да организирате и идентифицирате данните си по-ефективно. Този урок ще ви преведе през различни методи за преименуване на един работен лист или за преименуване на няколко работни листа едновременно и ще ви предостави основни правила за именуване на работни листове в Excel.

Преименуване на работен лист Щракнете двукратно върху раздела на листа Щракване с десния бутон върху раздела на листа Използване на клавишна комбинация Преименувайте няколко работни листа Персонализирано групово преименуване за конкретни/всички листове VBA метод за преименуване на всички листове Правила за именуване на работни листове в Excel

Видео: Преименуване на листове в Excel

Преименувайте работен лист в Excel

Има три лесни начина за преименуване на лист в Excel. Нека се потопим във всеки от тези методи.

Преименувайте работен лист, като щракнете двукратно върху раздела на листа

1. Щракнете двукратно върху раздела на работния лист, който искате да преименувате, за да активирате режима за редактиране на името.
2. Въведете желаното име за работния лист и натиснете Въведете.
3. 

Преименувайте работен лист, като щракнете с десния бутон върху раздела на листа

1. Щракнете с десния бутон върху раздела на работния лист, който искате да преименувате.
2. От падащото меню, което се показва, изберете Преименувам за да активирате режима за редактиране на име.
3. Въведете новото си име и натиснете Въведете.
4. 

Преименувайте работен лист с помощта на клавишна комбинация

1. Изберете раздела на работния лист, който искате да преименувате.
2. Натискане Alt + H + O + R последователно, за да активирате режима за редактиране на име.
3. Въведете новото си име и натиснете Въведете.

Преименувайте няколко работни листа в Excel

В следващия раздел ще обсъдим два ефективни метода за преименуване на множество избрани работни листове или всички работни листове в работна книга наведнъж. Независимо дали търсите адаптивен подход за преименуване или просто решение, ние ви покриваме.

Групово преименуване на конкретни/всички работни листове с многофункционален инструмент

с Kutools за Excel's Преименуване на работни листове функция, преименуването на множество работни листове в активната работна книга едновременно става бриз. Можете да изберете работните листове за преименуване и да добавите префикс/наставка или да замените изцяло оригиналните имена. За тези модификации можете да използвате входна стойност, стойности от определен диапазон или стойност от конкретна клетка във всеки избран работен лист.

След инсталиране на Kutools за Excel, отидете до Kutools плюс И изберете Работен лист > Преименуване на работни листове. В диалоговия прозорец, който се появява, направете следното:

1. Изберете работните листове, които искате да преименувате.
2. Изберете желаните опции за преименуване.
3. Изберете източника на името. Ако изберете От поле за въвеждане опция, трябва да въведете стойност в полето за въвеждане.
4. 

Резултат

Избраните листове се преименуват незабавно въз основа на избраните от вас опции за преименуване.

Преименувайте всички работни листове с VBA (сложно)

В този раздел ще представим два VBA кода за добавяне на префикс/наставка към всички имена на работни листове или за преименуване на всички работни листове въз основа на стойността на конкретна клетка във всеки работен лист.

Стъпка 1: Създайте нов модул

1. Натискане Alt + F11 за да отворите Visual Basic за приложения (VBA) редактор.
2. Кликнете Поставете > Модули за създаване на нов модул.
3. 

Стъпка 2: Копирайте кода на VBA в прозореца на модула

Копирайте някой от долните VBA кодове и го поставете в отвореното Модули прозорец според вашите нужди.

• VBA код 1: Добавете префикс/наставка към всички имена на листове

• Sub renameSheetsWithPrefixSuffix()
  'Update by ExtendOffice
      Dim xWs As Worksheet
      Dim xPrefix As String
      Dim xSuffix As String
      xPrefix = "MyPre_" 'Replace "MyPre_" with your desired prefix.
      xSuffix = "_MySuf" 'Replace "_MySuf" with your desired suffix.
      On Error Resume Next
      For Each xWs In Worksheets
          xWs.Name = xPrefix & xWs.Name & xSuffix 'This snippet adds both prefix and suffix to sheet names. Adjust as needed.
      Next xWs
  End Sub

• Забележка:

  • В този код, за да добавите префикс и суфикс към всички имена на листове, трябва да замените "MyPre_" намлява "_MySuf" на 6-ти и 7-ми ред съответно с желания префикс и наставка.
  • За да добавите само префикс, променете 10-ия ред от кода да бъде xWs.Name = xPrefix & xWs.Name.
  • За да добавите само суфикс, променете 10-ия ред от кода да бъде xWs.Name = xWs.Name & xSuffix.
• VBA код 2: Преименувайте всички листове въз основа на определената стойност на клетка във всеки лист

• Sub renameSheetsBasedOnCellValue()
  'Update by ExtendOffice
      Dim xWs As Worksheet
      Dim xRgAddress As String
      xRgAddress = "A1" 'Replace "A1" with your target cell address.
      On Error Resume Next
      For Each xWs In Worksheets
          xWs.Name = xWs.Range(xRgAddress).Value
      Next xWs
  End Sub

• Забележка: В този VBA код не забравяйте да промените "А1" на 5-ия ред до действителния адрес на клетката, който съдържа новото име за всеки работен лист. Също така се уверете, че определената клетка (в този случай A1) на всеки лист съдържа стойност. В противен случай изпълнението на този VBA код ще доведе до грешка по време на изпълнение „1004“.

Стъпка 3: Стартирайте VBA кода

в Модули прозорец, натиснете F5 или кликнете върху бутон за изпълнение на поставения код.

Резултат

• Резултат от VBA код 1: „Pre_“ и „_Suf“ се добавят съответно като префикс и суфикс към всички имена на листове.
• 
• Резултат от VBA код 2: Всички листове се преименуват въз основа на стойността в клетка A1 на всеки лист, които са съответно „Тест1“, „Тест2“ и „Тест3“.
• 

Правила за именуване на работни листове в Excel

Докато преименувате вашите работни листове, има няколко правила, които трябва да следвате:

• Имената на работните листове трябва да са уникални в работната книга.
• Имената на работните листове не трябва да надвишават 31 знака.
• Имената на работните листове не трябва да се попълват.
• Имената на работните листове не трябва да съдържат знаците: \ / ? : * [ ].
• Имената на работните листове не трябва да започват или завършват с апостроф ('), въпреки че може да се използва някъде по средата на името.
• Имената на работните листове не трябва да бъдат История тъй като е запазено за вътрешна употреба от Excel.

Като следвате този урок, можете ефективно да преименувате работни листове в Excel, за да организирате и управлявате по-добре вашите данни. Надявам се да намерите урока за полезен. Ако искате да проучите още съвети и трикове за Excel, моля, натиснете тук за достъп до нашата обширна колекция от над хиляди уроци.

Свързани статии

• Как да копирате лист и да преименувате автоматично в Excel?
• В Excel как можете да копирате работен лист и да го преименувате автоматично, без да въвеждате името, както обикновено? В тази статия ще говоря за това как да копирате лист веднъж или няколко пъти и да им дадете конкретни имена наведнъж.