Terminar un autofiltrado
Hola gustavo, te comento que estuve buscando la forma de realizar una búsqueda en un textbox por nombre y enconre una respuesta tuya con un autofiltrado que lo aplique de la siguiente manera:
Private Sub CommandButton1_Click()
varCondicion = "=*" & TextBox1.Text & "*"
Selection.AutoFilter Field:=1, Criteria1:=varCondicion
Range("A1").Select
Range(Selection, Selection.End(xlDown)).Select
Set varRango = Selection.SpecialCells(xlCellTypeVisible)
For Each varNombre In varRango
ComboBox1.AddItem varNombre.Value
Next varNombre
End Sub
Mi pregunta es que después de escoger en el combobox la opción que requiero de la búsqueda, quisiera que al hacer click en otro commandbutton me elimine el autofiltrado de la hoja para que me siga mostrando todos los valores. Espero una respuesta favorable. Gracias
Private Sub CommandButton1_Click()
varCondicion = "=*" & TextBox1.Text & "*"
Selection.AutoFilter Field:=1, Criteria1:=varCondicion
Range("A1").Select
Range(Selection, Selection.End(xlDown)).Select
Set varRango = Selection.SpecialCells(xlCellTypeVisible)
For Each varNombre In varRango
ComboBox1.AddItem varNombre.Value
Next varNombre
End Sub
Mi pregunta es que después de escoger en el combobox la opción que requiero de la búsqueda, quisiera que al hacer click en otro commandbutton me elimine el autofiltrado de la hoja para que me siga mostrando todos los valores. Espero una respuesta favorable. Gracias
1 respuesta
Respuesta
