Mega Code Archive

 

Categories / VisualBasic Script / Application

 

Use the OnKey method to assign a macro procedure to a single keystroke or any combination of Ctrl, Shift, and Alt with another

Sub AssignDown()          Application.OnKey "{Down}", "DownTen"      End Sub      Sub DownTen()          ActiveCell.Offset(10, 0).Select      End Sub      Sub ClearDown()          Application.OnKey "{Down}"      End Sub