Note: The other languages of the website are Google-translated. Back to English

Як вибрати конкретний аркуш на основі значення комірки на іншому аркуші в Excel?

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

Виберіть конкретний аркуш на основі вибору в розкривному списку з кодом VBA
Виберіть конкретний аркуш на основі значення комірки з кодом VBA
Легко створюйте індекс аркушів і переходьте на певний аркуш за допомогою Kutools для Excel


Виберіть конкретний аркуш на основі вибору в розкривному списку з кодом VBA


Наприклад, випадаючий список знаходить у комірці A2 аркуша8. Ви можете запустити наведений нижче код VBA, щоб вибрати або перейти до відповідного робочого аркуша, коли в розкривному списку вибрано назву аркуша.

1. прес інший + F11 відкрити Microsoft Visual Basic для додатків вікна.

2 В Microsoft Visual Basic для додатків вікно, двічі клацніть ім'я аркуша (робочий аркуш, що містить випадаючий список, з якого ви будете вибирати імена аркушів) на лівій панелі, а потім скопіюйте та вставте наведений нижче код VBA у вікно коду.

Код VBA: Виберіть конкретний аркуш на основі вибору в розкривному списку

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Not (Application.Intersect(Range("A2"), Target) Is Nothing) Then _
        ThisWorkbook.Sheets(Target.Value).Activate
End Sub

примітки: Ви можете змінити “A2” на свою власну комірку.

3. прес інший + Q клавіші одночасно, щоб закрити Microsoft Visual basic для програм вікна.

Відтепер, коли ви вибираєте назву аркуша у спадному списку Аркуш8, цей аркуш буде вибиратися автоматично.


Виберіть конкретний аркуш на основі значення комірки з кодом VBA

Якщо ви хочете перейти до певного робочого аркуша після введення імені аркуша в комірку (комірка А1 на аркуші1), ви можете спробувати наступний код VBA.

1. прес інший + F11 відкрити Microsoft Visual Basic для додатків вікна.

2 В Microsoft Visual Basic для додатків вікно, двічі клацніть ім'я аркуша (аркуш, який ви введете в ім'я аркуша) на лівій панелі, а потім скопіюйте та вставте наведений нижче код VBA у вікно коду. Дивіться знімок екрана:

Код VBA: виберіть конкретний аркуш на основі значення комірки

Sub ActivateSheetsByValue()
    On Error Resume Next
    ThisWorkbook.Sheets(Worksheets("Sheet1").Range("A1").Value).Activate
End Sub

3. Поверніться до робочого аркуша та введіть назву аркуша, який ви хочете вибрати, у комірку А1, і активуйте вікно коду, а потім натисніть клавішу F5, щоб запустити код.

Якщо комірка А1 у Аркуші1 містить ім’я аркуша “Аркуш8”, після запуску коду VBA він негайно перейде до Аркуша8.


Легко створюйте індекс аркушів і переходьте на певний аркуш за допомогою Kutools для Excel

Якщо ви просто хочете швидко вибрати або перейти до певного робочого аркуша, ви можете спробувати Створіть список назв аркушів корисність Kutools для Excel. За допомогою цієї утиліти ви можете легко створити індекс аркуша, а потім швидко перейти до певного аркуша, натиснувши на назву аркуша.

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

1. клацання Kutools Plus > Робочий аркуш > Створіть список назв аркушів. Дивіться знімок екрана:

2 В Створіть список назв аркушів діалогове вікно, виберіть Містить список гіперпосилань опція в Стилі індексу аркушів розділ; введіть ім'я для вашого індексу аркуша в Вкажіть назву аркуша для Індексу аркуша коробка; Вибирайте Перед усіма аркушами вставте індекс аркуша у випадаючому списку. Потім натисніть OK кнопки.

примітки: перевірте Містить кнопки та макроси Ви отримаєте індекс аркуша за допомогою кнопки макросів. Дивіться знімок екрана:

На робочому аркуші «Індекс» можна натиснути певне ім’я аркуша, щоб автоматично перейти до цього аркуша.

  Якщо ви хочете отримати безкоштовну пробну версію (30 днів) цієї утиліти, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.


Легко створюйте індекс аркушів і переходьте на певний аркуш за допомогою Kutools для Excel


Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2019 та 365. Підтримує всі мови. Простота розгортання на вашому підприємстві чи в організації. Повна функція 30-денної безкоштовної пробної версії. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (4)
Поки немає оцінок. Оцініть першим!
Цей коментар був мінімізований модератором на сайті
Будь ласка, завантажте відео про це, оскільки це буде набагато легше зрозуміти.
Цей коментар був мінімізований модератором на сайті
Я хотів би знати, як створити командну кнопку, коли у мене є приховані вкладки. У мене є спадний список імен, і кожне ім’я має спеціальну форму, я хотів би вибрати ім’я зі списку, і відображається аркуш цієї особи
Цей коментар був мінімізований модератором на сайті
Привіт. Я створив таблицю, в якій перераховано назви кожного аркуша в моїй книзі. У мене є макрос, за допомогою якого я вибираю клітинку з певною назвою аркуша, натискаю кнопку керування формою, і цей аркуш стає видимим і активним. Я хочу розширити це питання. Наприклад, у мене є 3 аркуші з іменами 107A, 107B, 107C Коли я вибираю 107 у своїй індексній таблиці, я хочу, щоб макрос відкривав кожен аркуш, який починається з 107. У мене є макрос, який знаходить та показує аркуші з іменем, як *107* але мені не вдалося змінити це, щоб шукати назву аркуша, зазначену в активній комірці. Ви можете допомогти?
Цей коментар був мінімізований модератором на сайті
привіт,
Вибачте, не можу вам з цим допомогти. Дякуємо за коментар.
There are no comments posted here yet
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця