Ver Mensaje Individual
  #2 (permalink)  
Antiguo 26/02/2016, 23:18
Avatar de Triby
Triby
Mod on free time
 
Fecha de Ingreso: agosto-2008
Ubicación: $MX->Gto['León'];
Mensajes: 10.106
Antigüedad: 16 años, 3 meses
Puntos: 2237
Respuesta: Vb y excel evento enter

En el código de la hoja correspondiente a "CONSULTA" pega lo siguiente:

Código vb:
Ver original
  1. Private Sub Worksheet_Change(ByVal Target As Range)
  2.     ' Si la celda actualizada no es la que necesitas, entonces sales sin hacer cambios
  3.    If Intersect(Target, Me.Range("E4")) Is Nothing Then Exit Sub
  4.  
  5.     ' Desactivas detección de eventos para prevenir ciclo infinito
  6.    Application.EnableEvents = False
  7.  
  8.     ' ***********************
  9.    ' Aquí agregas tu código para copiar, pegar y ejecutar la consulta
  10.    ' ***********************
  11.  
  12.     ' Activas nuevamente la detección de eventos para poder continuar
  13.    Application.EnableEvents = True
  14. End Sub
__________________
- León, Guanajuato
- GV-Foto