Excel - Problema e Textbox y autofiltro

   
Vista:

Problema e Textbox y autofiltro

Publicado por Juan (2 intervenciones) el 17/02/2014 21:01:06
hola, este es el codigo mejorado... pero aun asi tengo un problema, resulta que quiero usarlo para buscar numeros de codigos de barra.. pero no aparecen una vez que ingreso por el textbox el codigo. Se que tiene que ver pq solo toma Strings pero no se como convertir las celdas con numeros a String.

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyReturn Then
memo = TextBox1
ActiveSheet.Range("A1:F5000").AutoFilter Field:=2, Criteria1:="=*" & [memo] & "*" _
, Operator:=xlAnd
End If
ActiveWindow.SmallScroll Down:=-63
End Sub

archivo: https://www.dropbox.com/s/fceo7bcoxlzryr7/MUESTRA.xlsm
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder