Прескочи на основното съдържание

Как да пропуснете клетки или колони при табулация в Excel?

Автор: Силувия Последна промяна: 2016-12-09

По подразбиране натискането на клавиша 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 за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 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