Excel: Macro con la funcion de edicion/buscar

[abrahamvj]

Hola amigo:

Primero, aclarando algo, en el cuadro de dialogo de EDICION - BUSCAR, no es que le des ENTER al textbox y "busque", sino que al dar ENTER, le das al boton "buscar siguiente" que es el que tiene el "foco".

Ahora, si hablamos de un textbox del cuadro de controles, pues, un dilema seria que no tiene un evento ENTER, que "dispare" una macro, pero hay un modo de "imitarlo":

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyReturn Then Call nombredemacro
End Sub

Intentalo y cualquier cosa comenta.

Abraham