0

Sucede que estoy creando un Userform que tiene un ListBox que contiene la información de una hoja (N° de Factura, Cliente, Monto, etc.) y me gustaría poder filtrar a través de un ComboBox por Cliente (por ejemplo) y que la Listbox me muestre la tabla filtrada.

Enlace a archivo

A continuación el código del UserForm que estoy trabajando.

Private Sub CommandButton1_Click()
    If ComboBox1.Value <> "" Then ActiveSheet.ListObjects("Tabla2").Range.AutoFilter Field:=2, Criteria1:=ComboBox1.Value
End Sub

Private Sub CommandButton2_Click()
    ActiveSheet.ListObjects("Tabla2").Range.AutoFilter Field:=2
End Sub

RowSource de TextBox ="Tabla2"

8
  • 1
    Es necesario que subas tu archivo, para asi poder ayudarte mas facil. Commented el 3 abr. 2017 a las 19:48
  • Estimado, como podría subir el Archivo? Commented el 3 abr. 2017 a las 19:53
  • Debes apretar sobre : Editar Alli se inicia la edicion de tu pregunta y puedes agregar el codigo Commented el 3 abr. 2017 a las 19:54
  • Subí el archivo a Google Drive, espero que sirva. El Userform al que me refiero en la pregunta es "Userform 2". Logré poner el botón para filtrar, pero no se refleja el filtro en el ListBox Commented el 3 abr. 2017 a las 20:05
  • 2
    @IvanBotero cuidado con los términos, subir un archivo no es lo mismo que editar la pregunta y poner el código. Subir un archivo es completamente algo muy diferente.
    – Phi
    Commented el 3 abr. 2017 a las 20:29

0

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge you have read our privacy policy.

Examina otras preguntas con la etiqueta o formula tu propia pregunta.