Як створити список усіх назв робочих аркушів із книги?
Припустимо, у вас є книга з декількома аркушами, тепер ви хочете перерахувати всі імена аркушів у поточній книзі, чи існує якийсь швидкий метод для створення списку тез імен аркушів у Excel, не вводячи їх по одному? Цей підручник містить вказівки щодо переліку імен робочих аркушів у програмі Excel.
Отримайте список усіх назв робочих аркушів із книги динамічно за допомогою формул
Отримайте список усіх назв робочих аркушів із книги з корисною функцією
Отримайте список усіх назв робочих аркушів із книги з кодом VBA
Отримайте список усіх назв робочих аркушів із книги динамічно за допомогою формул
В Excel ви можете визначити назву діапазону, а потім застосувати формулу для переліку всіх назв аркушів із поточної книги, виконайте такі дії:
1. Перейдіть до клацання Formula > Менеджер імен, див. скріншот:
2, в Менеджер імен діалогове вікно натисніть кнопку Нові , див. знімок екрана:
3. В вискочив Нове ім'я діалогове вікно, вкажіть ім'я в ІМ'Я текстове поле, а потім скопіюйте наведену нижче формулу в Відноситься до текстове поле, див. знімок екрана:
=GET.WORKBOOK(1)&T(NOW())
4. Потім натисніть OK > близько щоб закрити діалогові вікна, зараз перейдіть на аркуш, де потрібно перерахувати всі назви аркушів, а потім введіть таку формулу в порожню комірку:
=IFERROR(INDEX(MID(Sheetnames,FIND("]",Sheetnames)+1,255),ROWS($A$2:A2)),"")
примітки: У наведеній вище формулі, Назви аркушів - це назва діапазону, який вас цікавить на кроці 3.
5. А потім перетягніть маркер заповнення вниз до комірок, коли відображаються порожні комірки, і тепер усі імена аркушів поточної книги перераховані, як показано на знімку екрана нижче:
6. Якщо ви хочете створити гіперпосилання для кожного аркуша, використовуйте формулу нижче:
=HYPERLINK("#'"&A2&"'!A1","Go To Sheet")
примітки: У наведеній вище формулі, A2 - комірка, що містить ім'я аркуша, і A1 - це комірка, в якій ви бажаєте знаходити активну комірку. Наприклад, якщо клацнути текст гіперпосилання, він знайде комірку А1 аркуша.
7. Тепер, коли ви натискаєте текст гіперпосилання, ви перейдете до цього аркуша, див.
- 1. За допомогою наведених формул назви створених аркушів перелічуються динамічно, при зміні імені аркуша в книзі ім’я аркуша індексу буде оновлено автоматично.
- 2. Ви повинні зберегти файл як Книга Excel з підтримкою макросів форматі, якщо ви хочете, щоб формули працювали добре після закриття та повторного відкриття файлу.
Отримайте список усіх назв робочих аркушів із книги з корисною функцією
З Створіть список назв аркушів утиліта сторонньої надбудови Kutools для Excel, ви можете створити список назв робочих аркушів одним клацанням миші та зв’язати кожен аркуш гіперпосиланням.
після установки Kutools для Excel, будь ласка, зробіть так:
1. Натисніть Kutools Plus > Робочий аркуш > Створіть список назв аркушів, див. скріншот:
2, в Створіть список назв аркушів у діалоговому вікні, будь ласка, вкажіть такі налаштування:
(1.) Виберіть стилі індексу аркуша Ви можете створити назви робочого аркуша за допомогою гіперпосилань або за допомогою кнопок макросів. (2.) Введіть назви робочого аркуша для індексу аркуша. (3.) Вкажіть розташування індексу робочого аркуша. (4.) Вкажіть, скільки стовпців ви хочете використовувати на новому аркуші для відображення імен аркуша. |
3. Закінчивши налаштування, натисніть OK. Усі імена робочого аркуша перелічені із посиланнями на новому аркуші поточної книги. Дивіться знімок екрана:
назви робочого аркуша з гіперпосиланнями | назви робочого аркуша з кнопками макросів |
Отримайте список усіх назв робочих аркушів із книги з кодом VBA
1. Утримуйте клавішу ALT + F11 і відкриває Microsoft Visual Basic для додатків вікна.
2. Клацання Insert > Модуліта вставте наступний макрос у Модулі Вікно
VBA: Перелічіть усі назви робочого аркуша з гіперпосиланнями на новому аркуші:
Sub CreateIndex()
'updateby Extendoffice
Dim xAlerts As Boolean
Dim I As Long
Dim xShtIndex As Worksheet
Dim xSht As Variant
xAlerts = Application.DisplayAlerts
Application.DisplayAlerts = False
On Error Resume Next
Sheets("Index").Delete
On Error GoTo 0
Set xShtIndex = Sheets.Add(Sheets(1))
xShtIndex.Name = "Index"
I = 1
Cells(1, 1).Value = "INDEX"
For Each xSht In ThisWorkbook.Sheets
If xSht.Name <> "Index" Then
I = I + 1
xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
End If
Next
Application.DisplayAlerts = xAlerts
End Sub
3, натисніть F5 щоб запустити цей макрос. Тепер усі назви робочих аркушів в активній робочій книзі перераховано в новому робочому аркуші під назвою «Індекс», і назви аркушів також пов’язані з кожним аркушем, див. знімок екрана:
Статті по темі
Перелічіть усі імена файлів у папці та створіть гіперпосилання для них
Для повсякденної роботи вам може знадобитися імпортувати кілька імен файлів з папки на робочий аркуш і створити гіперпосилання для кожного файлу, щоб швидко і легко відкривати файл. Можливо, ви можете скопіювати та вставити імена файлів і створити для них гіперпосилання по одному вручну, але це витратить багато часу, якщо в папці є сотні файлів.
Копіюйте або переміщуйте файли з однієї папки в іншу на основі списку
Якщо у вас є список імен файлів у стовпці на аркуші, а файли знаходяться в папці на вашому комп'ютері. Але тепер вам потрібно перемістити або скопіювати ці файли, імена яких вказані на аркуші, з їх вихідної папки в іншу, як показано на наступному знімку екрана. Як ви могли виконати це завдання якомога швидше в Excel?
Отримати список назв аркушів у Google Таблицях
У цій статті я представив деякі методи отримання назви поточного імені аркуша або списку імен аркушів у аркушах Google.
Перейдіть між робочими аркушами, використовуючи випадаючий список
Припустимо, у вас є робоча книга, яка містить кілька робочих аркушів, тепер вам потрібно створити випадаючий список або комбіноване поле, де перелічуються всі імена аркушів, і коли ви виберете одне ім'я аркуша зі спадного списку, воно негайно перейде на цей аркуш. У цій статті я розповім, як переміщатися між аркушами за допомогою випадаючого списку в Excel.
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Зміст
- Отримайте список усіх назв робочих аркушів із книги динамічно за допомогою формул
- Отримайте список усіх назв робочих аркушів із книги з корисною функцією
- Отримайте список усіх назв робочих аркушів із книги з кодом VBA
- Статті по темі
- Найкращі інструменти для підвищення продуктивності офісу
- Коментарі