Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
изменение стандартных имен листов
 
#1
29.08.2013 22:20:10
При создании новой книги листам присваиваются имена Лист1 и т.д. Я хочу задать собственные имена, чтобы при открытии новой книги у листов были имена Статья1, Статья2 и т.д.
Как это сделать.
У меня в книге д.б. 160 листов. Вручную переименовывать утомительно.
 
 
 
#2
29.08.2013 22:59:53
В модуль книги
Код
Option Explicit
Sub RenameSheets()
Dim Sht As Worksheet
Dim i As Integer
    For i = 1 To Sheets.Count
        Sheets(i).Name = "Статья_" & i
    Next
End Sub
Изменено: Kuzmich - 29.08.2013 23:03:33
 
 
 
#3
29.08.2013 23:13:58
спасибо за макрос. Но я надеялась, что можно где-то в настройках поменять.
Но макрос - тоже хороший выход.
Спасибо.
Изменено: OdriH - 29.08.2013 23:16:27 (добавила)
 
 
 
#4
29.08.2013 23:38:46
В настройках никак нельзя. Так же как и имя книги, диаграммы, фигуры и т.д.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#5
29.08.2013 23:47:32
спасибо, The_Prist.
буду пользоваться макросом. Потом его удалю из книги
 
 
 
Страницы: 1
Наверх