Ver Mensaje Individual
  #1 (permalink)  
Antiguo 17/09/2006, 19:38
LgVudu
 
Fecha de Ingreso: septiembre-2006
Mensajes: 8
Antigüedad: 17 años, 7 meses
Puntos: 0
Tecla Enter para ejecutar comando no funciona

Antes que nada quiero sumarme a todas las felicitaciones que les dan día a día a todos los que responden en este foro, por la gran calidad y calidez con la que responden a cada pregunta, desde las más básicas a las más complicadas.

Ahora mi consulta: intento poner un código para que se ejecute un comando cuando presiono la tecla Enter en un textBox. Busqué en internet y en todos lados dice lo mismo, pero cuando lo agrego a mi módulo no funciona, alguien tiene una idea???.

Pongo el código como yo lo tengo escrito:

Private Sub cmdHistorico_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii = 13 Then
Cells.Find(What:=txtBuscar.Value, After:=ActiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:= _
xlNext, MatchCase:=False).Activate

End If

Musicimas gracias por todo.