Przejdź do głównej zawartości

Jak pominąć komórki lub kolumny podczas tabulacji w programie Excel?

Domyślnie naciśnięcie klawisza Tab w programie Excel spowoduje przejście z komórki do następnej w poziomie. W przypadku niektórych użytkowników programu Excel mają tendencję do pomijania komórek podczas tabulacji w programie Excel. Na przykład komórka A1 wybiera teraz, po naciśnięciu klawisza Tab przeskoczy bezpośrednio do komórki C1 z pominięciem komórki B1, a ponowne naciśnięcie klawisza Tab spowoduje pominięcie komórki D1 i przejście do E1, jak pokazano na zrzucie ekranu. Jak to osiągnąć? Metoda opisana w tym artykule może ci pomóc.

Pomiń komórki lub kolumny podczas tabulacji z kodem VBA


strzałka niebieski prawy bąbelekPomiń komórki lub kolumny podczas tabulacji z kodem VBA

Wykonaj następujące czynności, aby pominąć komórki lub kolumny podczas tabulacji w programie Excel przy użyciu kodu VBA.

1. W arkuszu roboczym musisz pominąć komórki podczas tabulacji, kliknij prawym przyciskiem myszy kartę arkusza i kliknij Wyświetl kod z menu kontekstowego.

2. W otwarciu Microsoft Visual Basic for Applications należy skopiować i wkleić poniższy kod VBA do okna Code.

Kod VBA: Pomiń komórki lub kolumny podczas tabulacji w programie 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

Note: W kodzie, [B: B], [D: D], [F: F] to kolumny, które pominiesz naciskając klawisz Tab. Możesz je zmieniać według potrzeb i możesz dodać nową kolumnę, którą musisz przejść do kodu.

3. wciśnij inny + Q klawisze, aby wyjść z Microsoft Visual Basic for Applications okno.

Odtąd podczas tabulacji w Excelu określone komórki kolumn będą automatycznie pomijane. Jednocześnie możesz kliknąć tylko te określone kolumny, pominięte kolumny nie zostaną zaznaczone ani edytowane.

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
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