Gå til første ledige celle

Ja - vender tilbage senere - med mindre nogle er hurtigere :-)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim række, kolonne
    With Target
        If .Column = 1 Then
            række = .Row
           
            For kolonne = 9 To 240
                If Cells(række, kolonne) = "" Then
                    Cells(række, kolonne).Activate
                    Exit For
                End If
            Next kolonne
        End If
    End With
End Sub

Imponerende - virker perfekt. Hvis jeg nu vil bruge kolonne h til at komme tilbage, hvad gør jeg så?

Du får et svar -

Hvad mener du med dit sp...?

Send et svar. Jeg mener, at når jeg eks. står langt ude i rækken,vil jeg gerne tilbage til kolonne c i samme række. Da vinduet er låst ved kolonne h, kan jeg der lave det samme som i kolonne a - blot gå tilbage.

Ja - skal se på mulighederne..

Rem Version
Rem =======
Rem DobbeltKlik - og der returneres til Kolonne C i samme række

Dim række, Kolonne
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If række <> "" Then
        Cells(række, 3).Activate
    End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    With Target
        If .Column = 1 Then
            række = .Row
           
            For Kolonne = 9 To 240
                If Cells(række, Kolonne) = "" Then
                    Cells(række, Kolonne).Activate
                    Exit For
                End If
            Next Kolonne
        End If
    End With
End Sub

Rigtigt godt. Tusind tak for hjælpen.

Selv tak