View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
embarrassed embarrassed is offline
external usenet poster
 
Posts: 1
Default Enter pressed in Textbox

Hi Jake,

Thanks for the post and I applied your code to my
project. However, I now receive a fatal error and Excel
must close. My error handling notwithstanding, why would
the code execute when I trigger the button event with my
mouse, but not when I hit enter in the text box?

Here's the code for both events:

Private Sub CommandButtonExecute_Click()
RunWorksheet
End Sub

Private Sub TextBoxCustNum_KeyDown(ByVal KeyCode As
MSForms.ReturnInteger, ByVal Shift As Integer)

MsgBox KeyCode
If KeyCode = 13 Then ' ENTER key pressed
RunWorksheet
End If
End Sub

Thanks in advance.

-----Original Message-----
Hi embarrased,

You need to use the KeyDown event for that, as the Enter

key will never
trigger the KeyPress event:

Private Sub TextBox1_KeyDown(ByVal KeyCode As _
MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then
'/ ENTER key pressed
MsgBox "Done"
End If
End Sub

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address

unmonitored]


embarrased wrote:
How do I signal my code to run when the user presses

the
ENTER button in the Text Box TextBoxCustNum?

Private Sub TextBoxCustNum_KeyPress(ByVal KeyAscii As
MSForms.ReturnInteger)
?????????????????????????????
End Sub


.