Werkelijk ingewikkeld niet - u zou een aantekenvel activeert gebeurtenis en een selectieverandering één nodig hebben - iets als de hieronder code.
FYI, onderaan IS de norm.
1: 2: 3: 4: 5: 6: 7:
Privé SubWorksheet_SelectionChange (Doel ByVal als Waaier) Als om te snijden niet (Doel, rnage („A: “)) Is dan niets Application.MoveAfterReturnDirection = xlDown Anders Application.MoveAfterReturnDirection = xlRight Eind als Sub van het eind