Tengo una macro que hace busquedas donde se ingresa el dato en un textbox  y muestra el dato en un Label pero necesito que el boton de busqueda se mantenga en movimiento hacia donde se encuentre el usuario (celdas) como hago esta propiedad o como hago que reaccione por medio de un comando hagase de cuentas como el de busqueda normal de excel Ctrl+B ....
 
Private Sub CommandButton1_Click()
'Pasamos el código a buscar, a una variable
codigo_a_buscar = TextBox1.Value
'Lo buscamos...
Cells.Find(What:=codigo_a_buscar, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
  :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
  False, SearchFormat:=False).Activate
'Seleccionamos el valor de la columna de la derecha (descripción),
'y pasamos ese valor a una variable
descripcion_del_codigo = ActiveCell.Offset(0, 1).Value
'Lo ponemos en la etiqueta oculta
Label2.Caption = descripcion_del_codigo
End Sub
 
Por cierto esta macro la dieron de ejemplo en un post anterior gracias eh... 
  
 
