application.onkey = "{DELETE}" VBA excel 2013 к листу

Я хочу связать ключ DELETE с клавиатурой с кодом VBA, который у меня есть, причина в том, что у меня есть много проверок на этом листе, поэтому, когда пользователь выбирает диапазон из Sheet4, тогда он нажимает кнопку удаления, это займет много времени время при выполнении. Как это сделать? У меня есть этот код, который будет связан с ключом DELETE:

Application.Calculation = xlCalculationManual Application.ScreenUpdating = False Application.DisplayStatusBar = False Application.EnableEvents = False ActiveSheet.DisplayPageBreaks = False 

Рабочие листы («Лист4»). Диапазон ——, clearcontents. Как узнать выбранный диапазон? Рабочие листы («Лист4»). Диапазон ——. Interior.ColorIndex = 0

  Application.Calculation = xlCalculationAutomatic Application.ScreenUpdating = True Application.DisplayStatusBar = True Application.EnableEvents = True ActiveSheet.DisplayPageBreaks = True 

Пожалуйста, помогите, спасибо за любые решения, я застрял здесь.

Давайте будем гением компьютера.