Hopfelter i Excel

Fjern fluebenet "låst" i de celler du skal hoppe til. Findes under formater celler - beskyttelse.

Bagefter beskytter du arket - Husk at fjerne fluebenet udfor "marker låste celler"

Måske en anden (brugbar?) idé - som godt nok ikke er med <tab>:
Kender du mulighederne under tools - options - fanen edit - under "move selection after <enter>" - hvor du kan bestemme hvor cursoren gør hen efter en indtastning.
Hilsen Luffe

Eller nedestående som kan udvides, hvis du skal til en anden celle fra A10 osv.

Private Sub Worksheet_Change(ByVal Target As Range)
'Flemming Dahl, december 2001, fd@smartoffice.dk
    Dim rJumper As Range
    Dim rJumpCells1 As Range
    Dim bJump1 As Boolean
    Dim lNumberOfStartCells As Long
    Dim iCount As Long

    'NOTER dig at sidste celle i rJumpCells1 er den samme celle som
    'første celle i rJumpCells2
    'MAX længde af JumpCells' Range er 255 karakter, så ingen unødige
    'mellemrum i definationen af Range("... ...")
    'Er du i tvivl om længden, så paste a1,A2....i8,i9 ind i en celle og
    'lad en anden celle tælle =LÆNGDE(xx)
    Set rJumpCells1 = Range("A1,A10,A20")
    lNumberOfStartCells = 1

    If Not Intersect(Target, rJumpCells1) Is Nothing Then
        bJump1 = True
        Set rJumper = rJumpCells1
    End If
   
    'Hopper løs
    If bJump1 Or bJump2 Then
        For iCount = 1 To rJumper.Areas.Count - lNumberOfStartCells
            If Not Intersect(Target, rJumper.Areas(iCount)) Is Nothing Then
                rJumper.Areas(iCount + lNumberOfStartCells).Activate
                Exit For
            End If
        Next iCount
    End If
   
    Set rJumper = Nothing
    Set rJumpCells1 = Nothing
End Sub

/dan