1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14:
Приватное Sub Worksheet_SelectionChange (цель ByVal как ряд) 'Место в модуль листа Application.OnKey «{ПЛАТА}», «Down1» Подводная лодка конца Приватная подводная лодка Down1 () 'Место в Module1 Selection.Offset (1, 0). Отборно Подводная лодка конца