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

Як встановити порядок вкладок комірок або розблокованих комірок в Excel?

Припустімо, що вам потрібно встановити порядок табуляції для ваших власних визначених комірок. Наприклад, натискання клавіші Tab перемістить від комірки B5 до C6, від C6 до D7, від D7 до E8, а потім повернеться до B5 під час виходу з комірки E8 на робочому аркуші. як показано на знімку екрана нижче. Як цього досягти? У цій статті наведено метод VBA.

Встановіть порядок вкладок комірок або розблокованих комірок за допомогою коду VBA


Встановіть порядок вкладок комірок або розблокованих комірок за допомогою коду VBA

Запустіть наведений нижче метод VBA, щоб встановити порядок вкладок комірок на звичайному аркуші або розблокованих комірок на захищеному аркуші.

1. На аркуші потрібно встановити порядок вкладок, клацніть правою кнопкою миші вкладку аркуша та клацніть Переглянути код з контекстного меню.

2 В Microsoft Visual Basic для додатків вікно, скопіюйте та вставте наведений нижче код VBA в код вікна.

Код VBA: встановіть порядок вкладок комірок або розблокованих комірок

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim tabArray As Variant
    Dim i As Long
    tabArray = Array("B5", "C6", "D7", "E8")
    Application.ScreenUpdating = False
    For i = LBound(tabArray) To UBound(tabArray)
        If tabArray(i) = Target.Address(0, 0) Then
            If i = UBound(tabArray) Then
                Me.Range(tabArray(LBound(tabArray))).Select
            Else
                Me.Range(tabArray(i + 1)).Select
            End If
        End If
    Next i
    Application.ScreenUpdating = True
End Sub

примітки:

1) У коді B5, C6, D7, E8 - порядок вхідних комірок, і ви повинні використовувати велику букву адреси комірки. Ви можете змінити їх відповідно до своїх потреб.
2) Для захищеного аркуша вхідні комірки повинні бути розблоковані.

3 Натисніть кнопку інший + Q клавіші, щоб закрити Microsoft Visual Basic для додатків вікна.

Відтепер, після введення даних у B5, курсор переходить до C6 натисканням клавіші Tab або Enter, потім переходить до D7, коли залишає C6, а потім переходить до D7, E8 на поточному аркуші.


Статті по темі:


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

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

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

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

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (14)
Поки немає оцінок. Оцініть першим!
Цей коментар був мінімізований модератором на сайті
Чи можна використовувати це для примусового переходу вкладки до наступної незаблокованої клітинки на аркуші? Наприклад, мені потрібно, щоб оператор ввів (сканував) дані в клітинку A15, а потім він повинен перейти до C15, потім E15, потім G15 (який є кінцем рядка), а потім повернутися до першої клітинки в наступній ряд, А16 і повторіть послідовність. Мені потрібно примусово застосувати цей шаблон, оскільки деякі оператори використовували сканери, запрограмовані на вкладку, а інші запрограмовані на вхід. Спасибі!!
Цей коментар був мінімізований модератором на сайті
Чи можна використовувати цей самий код, щоб примусово переміщувати вкладку в кожному рядку до кожної незахищеної клітинки? Мені потрібно зробити вкладку, починаючи з клітинки A15, а потім перейти до наступної незахищеної клітинки (C15), потім E15, потім G15. Опинившись тут, мені потрібно перейти до A16 і повторити процес для решти форми. Причина, чому мені це потрібно, полягає в тому, що дані вводяться сканером штрих-коду, і деякі запрограмовані на вкладку, а інші на введення. Дякую за допомогу в цьому. Spinaz
Цей коментар був мінімізований модератором на сайті
Вітаємо та дякую за код VBA для встановлення порядку табуляції на захищеному аркуші, де мітки керування формою та спадні вікна керування формою розблоковані, а користувач може виконувати вкладку та заповнювати інформацію в мітці, а також при переході до у спадному списку виберіть кількість елементів, які йому дають інструкції, і я досяг прогресу з вашим кодом. Спочатку я міг лише вкладати вкладки через кожен із елементів керування форми мітки, тепер я іноді відкриваю випадаючі списки. Мені дуже сподобається підручник про те, як це робити
Цей коментар був мінімізований модератором на сайті
У тому порядку, який ви перерахували, excel обходиться без коду VBA. Змусьте їх повернутися назад, тоді ви щось отримаєте.
Цей коментар був мінімізований модератором на сайті
Спочатку виберіть осередки, які ви хочете зробити незахищеними.

Коли ви захистите свій аркуш, він автоматично встановить порядок вкладок відповідно до ваших незахищених клітинок. Він переміщатиметься вперед зліва направо та зверху вниз; Shift+Tab назад справа наліво та знизу вгору.
Цей коментар був мінімізований модератором на сайті
Шановний Еване,
Дякую, що поділились.
Цей коментар був мінімізований модератором на сайті
Дякую за код при введенні замовлення. Я працюю над електронною таблицею, яка вводить інформацію про штрих-код, і мені потрібно охопити до 300 клітинок, а програма дозволяє мені вводити лише 142 клітинки. Чи є спосіб додати більше, щоб я міг отримати до 300?



Дякую
Цей коментар був мінімізований модератором на сайті
Привіт Жанна,
Дякую за ваш коментар.
Але код не можна оптимізувати для задоволення ваших потреб. Вибач за це.
Цей коментар був мінімізований модератором на сайті
No me funcionó, lo coloqué en la hoja de trabajo, debe haber algún error, me podrían ayudar, necesito implementarlo en mi trabajo,

Atte,

Коллінз Непталі Араіс Лопес
Цей коментар був мінімізований модератором на сайті
Привіт, чи є спосіб просто натиснути Enter, нічого не вводячи, і перейти до наступного вибору?
Цей коментар був мінімізований модератором на сайті
Привіт! Новий тут. Код VBA працює, доки я не натисну на кнопку Pull Down Box, я перейду до першого, зробивши вибір , натисну Tab, і він переміститься до заблокованої клітинки. Він діє як клітинка, в яку я не вводив жодних даних. пропозиції? GlennD24
Цей коментар був мінімізований модератором на сайті
О, кодіго VBA для визначення порядку функціональних можливостей. Eu percebi que para que ele funcione, é necessário entrar com um dado na célula e pressionar TAB ou ENTER.
PERGUNTA: Você tem como fazer este código percorrer todas as células (no meu caso são 31, sendo algumas vazias e outras com valores padrão) sem ter que entrar com dados nelas, somente pressionando TAB ou ENTER. Como eu tenho algumas células vazias e outras com valores, por padrão, eu gostaria de percorrer as células sem precisar entrar com dados em todas elas novamente, mas, somente alterando as células que forem preciso alter.

Текст перекладено Google Translator
Привіт, код VBA для встановлення порядку потрібних комірок працював ідеально. Я зрозумів, що для того, щоб це запрацювало, необхідно ввести дані в комірку і натиснути TAB або ENTER.
ПИТАННЯ: Ви можете зробити так, щоб цей код проходив через усі клітинки (у моєму випадку їх 31, деякі порожні, а інші зі значеннями за замовчуванням), не вводячи в них дані, просто натискаючи TAB або ENTER. Оскільки у мене є деякі порожні клітинки, а інші зі значеннями, за замовчуванням я хотів би перемикати клітинки без необхідності знову вводити дані в усі з них, а лише змінюючи клітинки, які мені потрібно змінити.att

Цей коментар був мінімізований модератором на сайті
Я скопіював ваш код у свій робочий аркуш, але щойно я закриваю його та знову відкриваю, щоб використати знову, код зникає. Як це зберегти?
Цей коментар був мінімізований модератором на сайті
Привіт, Аніта,
Якщо ви хочете зберегти код VBA для використання функцій, після додавання коду VBA збережіть свою книгу як Книга Excel із підтримкою макросів як показано на знімку екрана нижче. Потім використовуйте щойно збережений файл у майбутньому.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/Excel_macro-enabled_workbook.png
There are no comments posted here yet
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця

Слідуй за нами

Copyright © 2009 - WWW.extendoffice.com. | Всі права захищені. На основі ExtendOffice. | Карта сайту
Microsoft та логотип Office є товарними знаками або зареєстрованими товарними знаками Microsoft Corporation у США та / або інших країнах.
Захищений Sectigo SSL