Hoe cellen of kolommen overslaan bij het tabben in Excel?
Als u in Excel op de Tab-toets drukt, gaat u standaard horizontaal van een cel naar de volgende. Voor sommige Excel-gebruikers hebben ze de neiging om cellen over te slaan bij het tabben in Excel. Cel A1 is bijvoorbeeld nu aan het selecteren, na het indrukken van de Tab-toets, zal het direct naar cel C1 springen door cel B1 over te slaan, en nogmaals op de Tab-toets drukken zal de cel D1 overslaan en naar E1 gaan zoals hieronder getoond. Hoe bereik je dit? De methode in dit artikel kan je daarbij helpen.
Sla cellen of kolommen over bij het tabben met VBA-code
Sla cellen of kolommen over bij het tabben met VBA-code
Ga als volgt te werk om cellen of kolommen over te slaan bij het tabben in Excel met behulp van VBA-code.
1. In het werkblad moet u cellen overslaan tijdens het tabben, klik met de rechtermuisknop op de bladtab en klik Bekijk code vanuit het contextmenu.
2. In de opening Microsoft Visual Basic voor toepassingen venster, kopieer en plak de onderstaande VBA-code in het codevenster.
VBA-code: sla cellen of kolommen over bij het tabben in 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: In de code zijn [B: B], [D: D], [F: F] kolommen die u overslaat als u op de Tab-toets drukt. U kunt ze naar behoefte wijzigen en u kunt een nieuwe kolom toevoegen die u in de code moet overslaan.
3. druk de anders + Q toetsen om het Microsoft Visual Basic voor toepassingen venster.
Vanaf nu worden bij het tabben in Excel de opgegeven kolomcellen automatisch overgeslagen. Tegelijkertijd kunt u alleen op deze opgegeven kolommen klikken, de overgeslagen kolommen worden niet geselecteerd of bewerkt.
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!