Ver Mensaje Individual
  #11 (permalink)  
Antiguo 08/09/2008, 21:14
DMatias
 
Fecha de Ingreso: septiembre-2008
Mensajes: 5
Antigüedad: 16 años, 6 meses
Puntos: 0
Respuesta: Como Ejecutar Codigo Mediante Enter En Excel

Mira yo lo que hago es esto para usar el command y el enter al mismo tiempo.

Capaz te funciona
-----------------------------------------------------------------------------
Private Sub password() 'Genero la accion que vos a usar en varias ocaciones
Dim p As String
p = Text1.Text
If Len(p) = 0 Then
MsgBox "Ingrese la clave", vbCritical, "Error"
Else
If p = "paco07" Then
Unload Form1
Form2.Show
Else
MsgBox "La clave ingresada es incorrecta." & vbCrLf & "Verifique el estado de la tecla 'Bloq Mayús'", vbCritical, "Error en Password"
End If
End If
End Sub

Private Sub text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii ' Cuado se apreta enter en text1 se ejecuta password
Case 13
Call password
End Select
End Sub

Private Sub Command1_Click() 'Cuando hago clik se ejecuta password
Call password
End Sub

Use como ejemplo la validacion de una palabra. Pero si estas parado sobre la texti.tex y apretas enter es lo mismo que hacer click en el Command1.

Espero que te sirva.

Saludos ideasking