Hola buenas noches,

He estado investigando y no consigo realizar una búsqueda con los campos de mas de 10 columnas.

El método que utilizo es el Additem y este solo me permite hasta un máximo de 10.

Adjunto método y archivo:

Private Sub txt_btfiltro_Click()

    numerodatos = Hoja9.Range("A" & Rows.Count).End(xlUp).Row
    ListPedidos = Clear

    Y = 0

    For fila = 3 To numerodatos

    numeropedido = Hoja9.Cells(fila, 3).Value

    If UCase(numeropedido) Like "*" & Me.txt_pfiltro.Value & "*" Then
    

        Me.ListPedidos.AddItem
        Me.ListPedidos.List(Y, 0) = Hoja9.Cells(fila, 1).Value
        Me.ListPedidos.List(Y, 1) = Hoja9.Cells(fila, 2).Value
        Me.ListPedidos.List(Y, 2) = Hoja9.Cells(fila, 3).Value
        Me.ListPedidos.List(Y, 3) = Hoja9.Cells(fila, 4).Value
        Me.ListPedidos.List(Y, 4) = Hoja9.Cells(fila, 5).Value
        Me.ListPedidos.List(Y, 5) = Hoja9.Cells(fila, 6).Value
        Me.ListPedidos.List(Y, 6) = Hoja9.Cells(fila, 7).Value

    Y = Y + 1

End If
Next
End Sub

Por lo que he podido averiguar necesito utilizar el método Rowsource pero no se como hacerlo...

Espero me puedan ayudar.

Saludos!

PaqNuevo.xlsmUnavailable

Mañana le echo un vistazo.

  En 26/11/2021 at 18:13 , Puche dijo:

El método que utilizo es el Additem y este solo me permite hasta un máximo de 10.

Pues mañana también  te doy una opción con este método

Prueba y comenta

El archivo..

PaqNuevo(1).xlsmUnavailable

Hola @JSDJSD,

Muchas gracias por tu respuesta.

Pero me sigue dando el mismo error, adjunto imagen y archivo de nuevo.

Lo que necesito es que se visualicen las 12 columnas en el Listbox cuando hago un filtro de busqueda.

Saludos,

PaqNuevo.xlsmUnavailable

Dentro de un rato te lo subo modificado

Prueba ahora a ver que tal.

PaqNuevo(2).xlsmUnavailable

También se puede hacer con  método Rowsource  y una hoja auxiliar que en cuanto pueda el Maestro Antoni te lo compartirá.

Utilizo el rango AA:AL de la hoja PEDIDOS para filtrar.

PaqNuevo.xlsmUnavailable

Muchas gracias a los 2!

Los 2 métodos me funcionan perfectamente

Saludos!