Code or macro required

[noexcelguru]

One of my commandbuttons will every now and then be hidden under the FormulaBar, is it possible to assign a short key/ hot key (CTRL+q) wich will run the CommandButton's code/ function?

CommandButton's code:

Private Sub CommandButton3_Click()
Select Case ActiveCell.Interior.ColorIndex
Case xlNone: ActiveCell.Interior.ColorIndex = 3
Case 3: ActiveCell.Interior.ColorIndex = 6
Case 6: ActiveCell.Interior.ColorIndex = 10
Case 10: ActiveCell.Interior.ColorIndex = xlNone
End Select
End Sub

 

[VoG]

Duplicate of http://www.mrexcel.com/forum/showthread.php?t=582861

Please do not post the same question multiple times. All clarifications, follow-ups, and bumps should be posted back to the original thread. Per forum rules, posts of a duplicate nature will be locked or deleted (rule #9 here: http://www.mrexcel.com/forum/showthread.php?t=99490).