Перейти к основному содержанию

Как пропустить ячейки или столбцы при табуляции в Excel?

По умолчанию нажатие клавиши Tab в Excel перемещает ячейку в следующую по горизонтали. Некоторые пользователи Excel пропускают ячейки при переходе с табуляции в Excel. Например, сейчас выбирается ячейка A1, после нажатия клавиши Tab она перейдет к ячейке C1 напрямую, пропуская ячейку B1, а повторное нажатие клавиши Tab пропустит ячейку D1 и перейдет к E1, как показано ниже. Как этого добиться? Метод, описанный в этой статье, может вам помочь.

Пропускать ячейки или столбцы при табуляции с кодом VBA


стрелка синий правый пузырьПропускать ячейки или столбцы при табуляции с кодом VBA

Чтобы пропустить ячейки или столбцы при переходе на табуляцию в Excel с помощью кода VBA, сделайте следующее.

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

2. В дебюте Microsoft Visual Basic для приложений окна, скопируйте и вставьте приведенный ниже код VBA в окно кода.

Код VBA: пропускать ячейки или столбцы при табуляции в Excel

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Static sRg As Range
    Dim ColumnOffset As Integer
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Union([B:B], [D:D], [F:F])) Is Nothing Then
        With Target
        Application.EnableEvents = False
        If Not sRg Is Nothing Then
            If sRg.Column < .Column Then
                ColumnOffset = 1
            ElseIf .Column <> 1 Then
                ColumnOffset = -1
            End If
        Else
            ColumnOffset = 1
        End If
        .Offset(, ColumnOffset).Select
        Application.EnableEvents = True
        End With
    End If
    Set sRg = ActiveCell
End Sub

Внимание: В коде [B: B], [D: D], [F: F] - это столбцы, которые вы пропускаете при нажатии клавиши Tab. Вы можете изменить их по своему усмотрению или добавить новый столбец, который нужно пропустить в коде.

3. нажмите другой + Q ключи для выхода из Microsoft Visual Basic для приложений окно.

С этого момента при переходе на табуляцию в Excel указанные ячейки столбца будут автоматически пропускаться. В то же время вы можете щелкнуть только эти указанные столбцы, пропущенные столбцы не будут выбираться или редактироваться.

Лучшие инструменты для офисной работы

🤖 Kutools AI Помощник: Революционный анализ данных на основе: Интеллектуальное исполнение   |  Генерировать код  |  Создание пользовательских формул  |  Анализ данных и создание диаграмм  |  Вызов функций Kutools...
Популярные опции: Найдите, выделите или определите дубликаты   |  Удалить пустые строки   |  Объедините столбцы или ячейки без потери данных   |   Раунд без формулы ...
Супер поиск: Множественный критерий VLookup    VLookup с несколькими значениями  |   VLookup по нескольким листам   |   Нечеткий поиск ....
Расширенный раскрывающийся список: Быстрое создание раскрывающегося списка   |  Зависимый раскрывающийся список   |  Выпадающий список с множественным выбором ....
Менеджер столбцов: Добавить определенное количество столбцов  |  Переместить столбцы  |  Переключить статус видимости скрытых столбцов  |  Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка Фокус   |  Просмотр дизайна   |   Большой Формулный Бар    Менеджер книг и листов   |  Библиотека ресурсов (Авто текст)   |  Выбор даты   |  Комбинировать листы   |  Шифровать/дешифровать ячейки    Отправлять электронные письма по списку   |  Суперфильтр   |   Специальный фильтр (фильтровать жирным шрифтом/курсивом/зачеркиванием...) ...
15 лучших наборов инструментов12 Текст Инструменты (Добавить текст, Удалить символы, ...)   |   50+ График Тип (Диаграмма Ганта, ...)   |   40+ Практических Формулы (Рассчитать возраст по дню рождения, ...)   |   19 Вносимые Инструменты (Вставить QR-код, Вставить изображение из пути, ...)   |   12 Конверсия Инструменты (Числа в слова, Конверсия валюты, ...)   |   7 Слияние и разделение Инструменты (Расширенные ряды комбинирования, Разделить клетки, ...)   |   ... и более

Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени.  Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...

Описание


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

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How can you skip multiple columns at once using this formula? I.e. I want to be able to skip columns A, H and then M to P
This comment was minimized by the moderator on the site
it's ok - i've replied to your email in gmail.
This comment was minimized by the moderator on the site
Hi, this definitely only works on the first two columns of spreadsheet (i.e B:B and D: D), it won't work on the third (i.e H:H) or any subsequent - it must be a limitation? Any way around it? - I have excel 2016
This comment was minimized by the moderator on the site
Hi Steve,
I have tested the code in Excel 2016, and it works. Do you mind attaching a copy of your data file? Sorry for the inconvenience.
This comment was minimized by the moderator on the site
sure, if you can give me an email address to send it to? mine is itginternet AT gmail . com.
This comment was minimized by the moderator on the site
The code only works on the first 2 rows in the spreadsheet - Once I wrap around to the 3rd row then the designated "Skip" cells are no longer skipped - So close on this please advise. Been looking for this code forever - Thanks
This comment was minimized by the moderator on the site
Hi Lonnie Nagel,
I try the code and it works on the whole worksheet. Which Excel version are you using?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations