[Resolved] Enter-ugrás egy bizonyos celléra

Szia!

Laphoz rendelt makró.
Ha csak egy ugrást akarsz létrehozni, elég 1 sor:
If Target.Address=”$A$10″ Then Range(„A15”).Select

A Select Case utasításokkal több ugrást megadhatsz.

Private Sub Worksheet_Change(ByVal Target As Range)
    Select Case Target.Address
        Case "$A$10": Range("A15").Select
        Case "$B$4": Range("B10").Select
        Case "$D$6": Range("D3").Select
        Case "$E$4": Range("b10").Select
        Case "$E$12": Range("F5").Select
    End Select
End Sub

Delila