keyascii=13 não funciona??

Question

 

A paz a todos..

 

 

 

Alguém sabe me dizer porque que o evento keypress utilizando keyascii=13 em formulário ou em planilha não funciona?

 

 

Obrigado..

Answer 1

Funciona só se o formulário tiver o foco.

 

Se ele possuir controles que recebam o foco, eles é que deverão ter o evento KeyPress.

 

No Access e no VB, a propriedade KeyPreview serve para que o formulário receba o evento antes do controle.

 

No Excel, esta dica deve lhe ajudar a usar um mesmo procedimento para todos os controles:

http://j-walk.com/ss/excel/tips/tip44.htm

 

 

Answer 2

 

Mas quando o foco está no formulario evento keypress usando keyascii=13 funciona normalmente, mas se o foco estiver num textbox usando keypress nele mesmo só o keyascii=13 não funciona, pq será??Alguma propriedade q tem q mudar??

 

 

Answer 3

Verdade, ele não entende o Enter como Asc no UserForm.

 

Use o evento KeyDown:

 

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 And Shift = 0 Then
    MsgBox "OK"
End If
End Sub

 

Answer 4

Agora sim funciona certinho.....Obrigado Luiz.