Activating a command button with a single key stroke
Its returning the character code..65 for A and so on..However if you are
unfamilar use the below code....
Dim A As Integer
If Chr(KeyCode) = "A" Then
AddTitle.Show
End If
If this post helps click Yes
---------------
Jacob Skaria
"Bishop" wrote:
I have the following code:
Private Sub AddButton_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _
ByVal Shift As Integer)
Dim A As Integer
If KeyCode = A Then
AddTitle.Show
End If
End Sub
but it doesn't work. What am I doing wrong?
"Jacob Skaria" wrote:
Use the keydown event of the command button. or the userform..
Private Sub CommandButton1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger,
ByVal Shift As Integer)
If KeyCode = 65 Then MsgBox "Run"
End Sub
--
If this post helps click Yes
---------------
Jacob Skaria
"Bishop" wrote:
Is there a way to activate a command button by simply pressing a single
letter on the keyboard? For example, say I have a button that says "Add A
Title". When I press the A key I want the button to activate and process
whatever code is attached to it.
|