Listbox con filas y columnas filtradas

[jhony12]

Hola a tod@s,
Estoy intentando llenar un Listbox con los valores de unas celdas, pero puede haber filas y columnas ocultas, es decir, filtradas. Sólo quiero que tome las celdas que estén visibles...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[silver_axe007]

tienes contadores , i, j m y filas...
ahora no entiuendo por que aumentas tanto la i y j al mismo tiempo como no hay libro de ejemplo no lo puendo probar , voy a hacer aalgo en casa para...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jhony12]

Gracias Silver, te aclaro alguna de tus dudas:
Antes de este procedimiento tengo otro para hallar el valor de fila. Para el ejemplo, imagina que fila=2
La variable i es para gestionar las columnas...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[silver_axe007]

Un tema

Dim i As Integer, j As Integer, filas As Integer

estas definiendo filas, entonces este fila es 0 en ese procedimiento ...

respecto a por que no cargan las filas ...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jhony12]

Es ahí donde estoy atrancado: no sé cómo hacer el otro bucle para cargar el resto de filas.

 

[silver_axe007]

considero una asistencia por anydesk seria lo mejor poir uqe no entiendo tu hoja como esta conformada y que necesitas que se cargue y que no.
en todo caso solo te falta algo asi...

Dim...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jhony12]

Ahora me da el error 381 en la línea 8: .List(.ListCount - 1, j - 1) = ActiveSheet.Cells(nfilas , i).Value

Sin permisos de acceso

 

[jhony12]

Bueno, al final lo he resuelto así:

'declaración e iniciación de variables
Dim i As Integer, j As Integer, m As Integer, filaInicial As Long

i = 1 'filas del listbox
j = 1...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí