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 for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

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

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (14)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
Можно ли это использовать для принудительного перехода вкладки к следующей разблокированной ячейке на листе? Например, мне нужно, чтобы оператор ввел (просканировал) данные в ячейку A15, а затем он должен перейти к C15, затем к E15, затем к G15 (что является концом строки), а затем вернуться к первой ячейке в следующем ряд, А16 и повторить последовательность. Мне нужно форсировать этот шаблон, так как некоторые операторы использовали сканеры, запрограммированные на вкладку, а другие запрограммированы на ввод. Спасибо!!
Этот комментарий был сведен к минимуму модератором на сайте
Можно ли использовать этот же код для принудительной вкладки каждой строки в каждую незащищенную ячейку? Мне нужно перейти на вкладку, начиная с ячейки A15, а затем перейти к следующей незащищенной ячейке (C15), затем E15, затем G15. Оказавшись здесь, мне нужно перейти к A16 и повторить процесс для оставшейся части формы. Причина, по которой мне это нужно, заключается в том, что данные вводятся сканером штрих-кода, и некоторые запрограммированы на вкладку, а другие на ввод. Спасибо за вашу помощь в этом. Спиназ
Этот комментарий был сведен к минимуму модератором на сайте
Привет и спасибо за код 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 appendarlo en mi trabajo,

Атте,

Коллинз Нептали Арраис Лопес
Этот комментарий был сведен к минимуму модератором на сайте
Привет, есть ли способ просто нажать Enter, ничего не вводя, и перейти к следующему выбору?
Этот комментарий был сведен к минимуму модератором на сайте
Привет, Новое здесь. Код VBA работает до тех пор, пока я не нажму раскрывающееся поле, я доберусь до первого при выборе, нажму Tab, и он переместится в заблокированную ячейку. Он действует как ячейка, в которую я не вводил никаких данных. Любой предложения? ГленнД24
Этот комментарий был сведен к минимуму модератором на сайте
Olá, о código VBA пункт definir a ordem дас células desejadas funcionou perfeitamente. Eu percebi Que Para Que El Funcione, é necessário entrar com um Dado na Célula e Pressionar TAB или 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 didos em todas elas novamente, mas, somente alterando as células que forem preciso alterar.att

Текст переведен Google Translator
Здравствуйте, код VBA для установки порядка нужных ячеек работал отлично. Я понял, что для его работы необходимо ввести данные в ячейку и нажать TAB или ENTER.
ВОПРОС: Вы можете сделать так, чтобы этот код проходил по всем ячейкам (в моем случае их 31, некоторые пустые, а другие со значениями по умолчанию) без необходимости вводить в них данные, просто нажимая TAB или ENTER. Поскольку у меня есть несколько пустых ячеек и другие со значениями, по умолчанию я хотел бы циклически перемещаться по ячейкам без необходимости снова вводить данные во все из них, а только изменять ячейки, которые мне нужно изменить.

Этот комментарий был сведен к минимуму модератором на сайте
Я скопировал ваш код в свой рабочий лист, но как только я его закрою и снова открою, чтобы использовать его снова, код исчезнет. Как мне это сохранить?
Этот комментарий был сведен к минимуму модератором на сайте
Привет анита,
Если вы хотите сохранить код VBA для использования функции, после добавления кода VBA сохраните свою книгу как Книга Excel с поддержкой макросов как показано на скриншоте ниже. Затем используйте вновь сохраненный файл в будущем.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/Excel_macro-enabled_workbook.png
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL