• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Cursor laten verspringen met TAB toets

Status
Niet open voor verdere reacties.

Yasmin

Gebruiker
Lid geworden
22 mei 2004
Berichten
183
Is het mogelijk om in een beveiligd werkblad
waarbij de cellen B5:C20 niet zijn geblokkeerd
De cursor met de TAB toets als volgt te laten verspringen:
B5--> C5 --> B8 --> C8 --> B11 --> C11 enz. i.p.v.
B5--> C5 --> B6 --> C6 --> B7 --> C7 enz.

De cellen waar overheen gesprongen wordt moeten nog
wel benaderbaar blijven.

Vr.gr.
André N.
 
Ik begrijp niet waarom je de cellen ertussen niet blokkeerd als je er toch niet op mag komen, maar misschien dat je volgende event-macro kan gebruiken:
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Cells.Count > 1 Then Exit Sub
  If (Target.Row - 2) Mod 3 = 0 Then
    If Target.Column = 2 Then
      Target.Offset(0, 1).Select
    ElseIf Target.Column = 3 Then
      Target.Offset(3, -1).Select
      If ActiveCell.Row > 20 Then Range("B5").Select
    End If
  End If
End Sub
kopieer de macro naar de werkbladcode
 
Ingrid,

Dit macro was precies wat ik zocht.
Het werkt prima.

vr.gr. André :thumb:
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan