Excel задать имя листа из ячейки
День добрый, можно ли каким то способом, желательно без применения макросов, изменять имя Листа из ячейки этого листа, или даже из соседнего.
Заранее СПАСИБО.
День добрый, можно ли каким то способом, желательно без применения макросов, изменять имя Листа из ячейки этого листа, или даже из соседнего.
Заранее СПАСИБО. NIC
Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
Макросом можно, но нужен файл и примерный алгоритм работы макроса. Автор - AlexM
Дата добавления - 21.04.2013 в 00:01
можно ли каким то способом, желательно без применения макросов, изменять имя Листа из ячейки этого листа, или даже из соседнего!
можно ли каким то способом, желательно без применения макросов, изменять имя Листа из ячейки этого листа, или даже из соседнего!
можно ли каким то способом, желательно без применения макросов, изменять имя Листа из ячейки этого листа, или даже из соседнего!
Без макроса отобразить можно. Изменить название листа по значению ячейки без макроса нельзя Serge_007
ЖАЛЬ! Не дружу я с этими макросами, да и ознакомиться некогда! Но скоро чувствую придется! И что же нужно написать, в исходном тексте, чтобы автоматом обновлялся, если не секрет. Спасибо
ЖАЛЬ! Не дружу я с этими макросами, да и ознакомиться некогда! Но скоро чувствую придется! И что же нужно написать, в исходном тексте, чтобы автоматом обновлялся, если не секрет. Спасибо NIC
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then Sheets(Sh.Index).Name = Target.Value
End Sub
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then Sheets(Sh.Index).Name = Target.Value
End Sub
Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then Sheets(Sh.Index).Name = Target.Value
End Sub
[/vba]
Макросы должны быть разрешены в настройках безопасности Excel Автор - AlexM
Дата добавления - 21.04.2013 в 20:59
КЛАСС. Работает! Только вот ещё какая штука, а если эта ячейка с именем будет формулой и будет обращена к другому листу, то не меняется, что нужно дописать или без вариантов.
Заранее спасибо.
КЛАСС. Работает! Только вот ещё какая штука, а если эта ячейка с именем будет формулой и будет обращена к другому листу, то не меняется, что нужно дописать или без вариантов.
Заранее спасибо. NIC
Я вам пример файла показал, теперь ваша очередь.
Покажите в примере какая формула, в какой ячейке. Попробуем разобраться почему не работает.
О примере я писал ранее
Вы сейчас прилаживаете всего лишь пример макроса под свою задачу. Скорее всего формулы будут не нужны.
Я вам пример файла показал, теперь ваша очередь.
Покажите в примере какая формула, в какой ячейке. Попробуем разобраться почему не работает.
О примере я писал ранее
Вы сейчас прилаживаете всего лишь пример макроса под свою задачу. Скорее всего формулы будут не нужны. AlexM
Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.
О примере я писал ранее
Вы сейчас прилаживаете всего лишь пример макроса под свою задачу. Скорее всего формулы будут не нужны. Автор - AlexM
Дата добавления - 21.04.2013 в 22:13
Извиняюсь. Можно конечно потратить время и показать, что это возможно, но к сожалению вам новый пример не пригодится.
Напишите и покажите на примере что вам нужно.
Может быть так надо?
На Лист1 (не важно название) В ячейках А2, А3 и А4 пишем названия листов.
При записи в А2 меняется название Листа2
При записи в А3 меняется название Листа3
При записи в А4 меняется название Листа4
И тд.
Извиняюсь. Можно конечно потратить время и показать, что это возможно, но к сожалению вам новый пример не пригодится.
Напишите и покажите на примере что вам нужно.
Может быть так надо?
На Лист1 (не важно название) В ячейках А2, А3 и А4 пишем названия листов.
При записи в А2 меняется название Листа2
При записи в А3 меняется название Листа3
При записи в А4 меняется название Листа4
И тд. AlexM
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("A2:A4"), Target) Is Nothing Then
For Each iCell In Target
Sheets(iCell.Row).Name = IIf(iCell <> "", iCell.Value, WorksheetFunction.Rept(" ", iCell.Row))
Next
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("A2:A4"), Target) Is Nothing Then
For Each iCell In Target
Sheets(iCell.Row).Name = IIf(iCell <> "", iCell.Value, WorksheetFunction.Rept(" ", iCell.Row))
Next
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("A2:A4"), Target) Is Nothing Then
For Each iCell In Target
Sheets(iCell.Row).Name = IIf(iCell <> "", iCell.Value, WorksheetFunction.Rept(" ", iCell.Row))
Next
End If
End Sub
Как назвать листы на основе значений ячеек (из списка) в Excel?
Обычно мы можем легко переименовать рабочий лист, щелкнув правой кнопкой мыши лист на вкладке «Лист» и выбрав «Переименовать» из контекстного меню в Excel. Что делать, если переименовать все / несколько листов с указанными значениями ячеек? А что, если динамическое присвоение имени листу на основе указанного значения ячейки? В этой статье несколько методов помогут вам легко их решить.
Динамически называть лист из значения ячейки с помощью VBA
Мы можем динамически назвать рабочий лист на основе значения определенной ячейки с помощью VBA в Excel, и вы можете сделать следующее:
Шаг 1. Щелкните правой кнопкой мыши рабочий лист на вкладке «Лист», которую вы будете динамически называть по значению ячейки, и выберите Просмотреть код из контекстного меню.
Шаг 2. В открывшемся окне Microsoft Visual Basic для приложений вставьте следующий код VBA в окно модуля.
Внимание: Этот VBA может динамически переименовывать лист на основе значения ячейки A1, и вы можете изменить A1 на другие ячейки в зависимости от ваших потребностей.
Шаг 3. Сохраните код VBA и закройте окно Microsoft Visual Basic для приложения.
Затем вы увидите, что имя листа динамически изменяется в зависимости от указанного значения ячейки.
Ноты:
- Если указанная ячейка пуста, рабочий лист не будет переименован;
- Если вы введете специальные символы в указанную ячейку, например *, появится предупреждение об ошибке.
Назовите несколько листов на основе значений ячеек в соответствующих листах
С Kutools для Excel Переименовать несколько листов функция, вы можете быстро назвать все / несколько листов с указанной ячейкой на соответствующем листе. Например, переименуйте каждый лист со значением Cell A1 на каждом листе.
Kutools for Excel - Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная 30-дневная пробная версия, кредитная карта не требуется! Бесплатная пробная версия сейчас!
Kutools for Excel - Combines more than 300 Advanced Functions and Tools for Microsoft Excel
1. Нажмите Кутулс Плюс > Рабочий лист > Переименовать листы. Смотрите скриншот:
2. В открывшемся диалоговом окне «Переименовать несколько листов» (см. Снимок экрана ниже):
(1) В Worksheets список, пожалуйста, проверьте рабочий лист, имя которого вы измените;
(2) В Параметры переименования раздел, пожалуйста, проверьте Заменить исходное имя листа вариант;
(3) В Имя нового рабочего листа раздел, пожалуйста, проверьте Переименовать листы с определенной ячейкой и укажите ячейку, содержимое которой вы назовете соответствующему листу.
(4) Щелкните значок Ok кнопку.
И теперь все проверенные листы были переименованы с указанной ячейкой каждого листа. Смотрите скриншот:
Kutools for Excel - Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная 30-дневная пробная версия, кредитная карта не требуется! Get It Now
Назовите несколько листов из указанного списка
Kutools для Excel Переименовать несколько листов функция также поддерживает наименование нескольких листов со значениями ячеек в указанном диапазоне.
Kutools for Excel - Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная 30-дневная пробная версия, кредитная карта не требуется! Бесплатная пробная версия сейчас!
Kutools for Excel - Combines more than 300 Advanced Functions and Tools for Microsoft Excel
1. Нажмите Кутулс Плюс > Рабочий лист > Переименовать листы.
2. В открывшемся диалоговом окне «Переименовать несколько листов» вам необходимо (см. Снимки экрана ниже):
(1) В Worksheets list, проверьте рабочий лист, который вы переименуете, со значениями ячеек.
(2) В Параметры переименования раздел, проверьте Заменить исходное имя листа вариант;
(3) В Имя нового рабочего листа раздел, проверьте Из определенного диапазона вариант, щелкните кнопку, чтобы открыть второе диалоговое окно Rename Multiple Worksheets, выберите ячейки, которые вы переименуете по их значениям, и нажмите кнопку OK кнопку.
(4) Щелкните значок Ok кнопку, чтобы применить переименование.
Затем вы увидите, что все отмеченные имена рабочих листов изменены на указанные значения ячеек. См. Снимок экрана ниже:
Kutools for Excel - Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная 30-дневная пробная версия, кредитная карта не требуется! Get It Now
Демонстрация: имена листов на основе значений ячеек (из списка) в Excel
Как переименовать листы на основе значений ячеек в Excel?
Переименование рабочих листов обычно применяется в нашей работе с Excel, но пробовали ли вы когда-нибудь переименовывать рабочие листы на основе значений ячеек? Конечно, вы можете переименовывать листы вручную, но здесь в этом руководстве представлены некоторые приемы, позволяющие быстро переименовать несколько листов на основе значений ячеек, что может сэкономить ваше рабочее время.
Переименование листов на основе определенной ячейки с помощью функции «Переименовать несколько листов»
Переименование листов на основе содержимого ячеек с помощью функции «Переименовать несколько листов»
Переименовать листы на основе определенной ячейки с VBA
С помощью VBA ниже вы можете переименовать относительный рабочий лист на основе определенной ячейки.
1. Выберите ячейку, на основе которой вы хотите переименовать лист, в этом случае выберите «Ячейка A1». Смотрите скриншот:
2. Нажмите Alt + F11 ключи для открытия Microsoft Visual Basic для приложений окно.
3. Нажмите Вставить > Модули, затем вставьте ниже код VBA в новый Модули окно.
VBA: переименование листов на основе определенных значений ячеек.
4. Нажмите F5 ключ для запуска кода VBA. Затем все листы были переименованы по каждому относительному значению ячейки A1.
Переименование листов на основе определенной ячейки с помощью функции «Переименовать несколько листов»
Если у вас есть Kutools for Excel, вам не нужно сохранять код VBA, вы можете использовать Переименовать несколько листов функция для быстрого переименования всего рабочего листа на основе их относительных ячеек.
После бесплатная установка Kutools for Excel, сделайте следующее:
1. Включите книгу, для которой вы хотите переименовать ее имена рабочих листов.
2. Нажмите Кутулс Плюс > Рабочий лист > Переименовать листы. Смотрите скриншот:
3. Затем в появившемся диалоговом окне отметьте листы, которые вы хотите переименовать, в Worksheets панели и выберите один из Переименовать вариант вам нужно, здесь я заменю имя листа, потом проверю Переименовать листы с определенной ячейкой, и выберите ячейку, которую нужно переименовать. Смотрите скриншот:
4. Нажмите Ok. Теперь листы переименованы с определенным содержимым ячеек.
Но иногда вам нужно переименовать несколько листов на основе диапазона значений ячеек, как показано на скриншоте ниже, в этом случае вы можете выбрать ниже метод.
Переименование листов на основе содержимого ячеек с помощью функции «Переименовать несколько листов»
Работы С Нами Переименовать несколько листов of Kutools for Excel, вы также можете переименовывать листы на основе выбранного диапазона.
После бесплатная установка Kutools for Excel, сделайте следующее:
1. Нажмите Кутулс Плюс > Рабочий лист > Переименовать листы. Смотрите скриншот:
2. в Переименовать несколько листов диалоговом окне необходимо указать следующие параметры:
(1) Выберите листы, которые нужно переименовать, из Список рабочих листов;
(2) Проверить Из определенного диапазона вариант и выберите значения ячеек, которые необходимо переименовать на основе;
(3) Укажите Параметры переименования, вы можете проверить Вставить перед именем исходного листа, Вставить после имени исходного листа или Заменить исходное имя листа, и вы можете предварительно просмотреть соответствующий результат в диалоговом окне.
3. Нажмите Ok, а затем вы увидите, что все выбранные вами листы были переименованы на основе указанных значений ячеек.
Заменить исходное имя листа
Вставить перед именем исходного листа
Вставить после имени исходного листа
С помощью утилиты Rename Worksheets вы также можете переименовывать рабочие листы с определенным префиксом или суффиксом. Щелкните здесь, чтобы узнать больше о переименовании нескольких листов.
Добрый день.
Подскажите а если необходимо
в формуле использовать Имя листа из ячейки
другой книги, допустим с названием "БазаДанных",
то куда или как его подставить в эту формулу
ни как не соображу.
Добрый день.
Подскажите а если необходимо
в формуле использовать Имя листа из ячейки
другой книги, допустим с названием "БазаДанных",
то куда или как его подставить в эту формулу
ни как не соображу.
ни как не соображу.
Заранее спасибо! Автор - Logist
Дата добавления - 11.12.2013 в 13:00
Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
Так как имя листа содержит пробелы, его надо заключать в апострофы
А если не СУММ, допустим, а СЦЕПИТЬ и вместо G:G конкретная ячейка с данными G4 и так далее вниз, как размножить такую формулу? Из-за кавычек прирастания G от протягивания вниз не произойдет?!
Так как имя листа содержит пробелы, его надо заключать в апострофы
А если не СУММ, допустим, а СЦЕПИТЬ и вместо G:G конкретная ячейка с данными G4 и так далее вниз, как размножить такую формулу? Из-за кавычек прирастания G от протягивания вниз не произойдет?! Kompromis
Так как имя листа содержит пробелы, его надо заключать в апострофы
А если не СУММ, допустим, а СЦЕПИТЬ и вместо G:G конкретная ячейка с данными G4 и так далее вниз, как размножить такую формулу? Из-за кавычек прирастания G от протягивания вниз не произойдет?! Автор - Kompromis
Дата добавления - 14.05.2014 в 09:03
размножаемая, то результат
размножаемая, то результат
ツ iii dиw ʁɔvʎнdǝвǝdǝu – dиw vǝmоɔ ɔ ɐwʎ iii ツ
размножаемая, то результат
ツ iii dиw ʁɔvʎнdǝвǝdǝu – dиw vǝmоɔ ɔ ɐwʎ iii ツ
Serge_007 выставил какие-то замечания, типа, за "Оверквотинг" за нарушение правил пп3..Что за дурость?! На пальцах объяснять чтоль? И в какой строке указано допустимое кол-во цитат? Или все на твое усмотрение?! Смахивает на детскую мстю какую-то. прям смешно. засорил остановившуюся тему цитатами.
ЗЫ: ПИШУ ЗДЫСЬ, т.к. Замечальщик забаррикадировался ото всех.
Serge_007 выставил какие-то замечания, типа, за "Оверквотинг" за нарушение правил пп3..Что за дурость?! На пальцах объяснять чтоль? И в какой строке указано допустимое кол-во цитат? Или все на твое усмотрение?! Смахивает на детскую мстю какую-то. прям смешно. засорил остановившуюся тему цитатами.
ЗЫ: ПИШУ ЗДЫСЬ, т.к. Замечальщик забаррикадировался ото всех. Kompromis
ЗЫ: ПИШУ ЗДЫСЬ, т.к. Замечальщик забаррикадировался ото всех. Автор - Kompromis
Дата добавления - 16.05.2014 в 09:01
Есть ли простой способ вставить имя текущего листа в одну ячейку? Как вставить имя всех листов в ячейки? В этой статье вы найдете хитрые методы решения этих проблем.
Быстро вставьте имя активного листа с помощью Kutools for Excel
Быстро вставляйте все имена листов с гиперссылками в ячейки в виде индекса
Быстро вставить имя текущего листа в ячейку с функциями
Просто введите формулу = ПРАВЫЙ (ЯЧЕЙКА ("имя файла", D2), LEN (ЯЧЕЙКА ("имя файла", D2)) - НАЙТИ ("]", ЯЧЕЙКА ("имя файла", D2))) в любую камеру и нажмите Enter key, в ячейке отображается имя текущего листа.
Эта формула может отображать только имя текущего листа, но не имя другого листа.
Быстро вставляйте все имена листов в ячейки с помощью VBA
Если вы хотите вставить все имена листов в ячейки, макрос VBA - хороший выбор.
Шаг 1: Удерживайте другой + F11 ключи в Excel, и он открывает Microsoft Visual Basic для приложений окно.
Шаг 2: нажмите Вставить > Модулии вставьте следующий макрос в окно модуля.
VBA для вставки имен всех листов в ячейки:
Sub SheetNames ()
Колонны (1) .Вставить
Для i = 1 To Sheets.Count
Cells (i, 1) = Sheets (i). Name
Затем я
End Sub
Шаг 3: нажмите F5 ключ для запуска этого макроса. Затем вы увидите, что имена всех листов будут указаны в столбце A текущего листа. Смотрите скриншот:
Внимание: В коде VBA вы можете изменить Ячейки (i, 1) к другой ссылке, чтобы вставить имена листов, начинающиеся с других ячеек. Например, вставьте имена листов, начинающиеся с C3, измените его на Ячейки (i + 2, 3) .
Быстро вставьте имя активного листа с помощью Kutools for Excel
Если вы хотите вставить информацию об активном листе, включая имя листа, имя книги, путь к файлу и т. Д., В ячейку или верхний / нижний колонтитул, вы можете использовать Kutools for ExcelАвтора Вставить информацию о книге.
После бесплатная установка Kutools for Excel, сделайте следующее:
1. Выберите ячейку или диапазон, в который нужно поместить имя листа, и щелкните Кутулс Плюс > Workbook > Вставить информацию о книге.
2. Затем выберите информацию из книги, которую нужно вставить, из Информация раздел и укажите место, из которого вы хотите разместить информацию Вставить в раздел. Затем нажмите OK.
Вставить информацию о книге в ячейку / верхний / нижний колонтитул
Быстро вставляйте все имена листов с гиперссылками в ячейки в виде индекса
Kutools for Excel's Создать список имен листов Утилита не только вставляет все имена листов в ячейки, но также вставляет гиперссылки на соответствующие листы.
После бесплатная установка Kutools for Excel, сделайте следующее:
Шаг 1: нажмите Кутулс Плюс > Рабочий лист > Создать список имен листов.
Шаг 2: в Создать список имен листов диалоговом окне, укажите настройки в соответствии с вашими потребностями и нажмите OK.
Затем вы увидите, что все имена листов вставлены в новый лист, и каждое имя листа ссылается на соответствующий лист. См. Следующие скриншоты:
Создать список имен листов Утилита упрощает создание списка всех имен рабочих листов активной книги на новом листе, который содержит гиперссылки или кнопки макросов для быстрого перехода к другим листам. Щелкните, чтобы узнать больше об этой утилите.
Читайте также: