ListBox que contenga datos de diferentes Hojas.

[josecroft]

Hola, compañeros del foro.

En la Hoja 1 hay un botón.
En la Hoja 2 hay una tabla con datos (dos columnas y 5 filas).
En la Hoja 3 hay una tabla con datos (dos columnas y 5 filas).
En la Hoja 4...

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í

 

[FGV]

Hola @josecroft,
Una opción es Anexar las 3 Tablas con Power Query en una nueva Tabla (TablaAnexar) en la Hoja Anexar. Puedes actualizarla con clic en...

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í

 

[JasallBcn]

Buenas @josecroft y @FGV , una forma es recorer las tablas con for each

saludos

 

[Macro Antonio]

Otra más:

Private Sub CrearListbox()
With Hoja4
   Hoja2.ListObjects("TablaHoja2").DataBodyRange.Copy .Range("G" & Rows.Count).End(xlUp).Offset(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í

 

[josecroft]

Gracias a los tres @FGV @JasallBcn y @Macro Antonio . Llevo dos días sin poder acceder al foro por algún problema de acceso. Ahora mismo...

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í

 

[josecroft]

Hola @josecroft,
Una opción es Anexar las 3 Tablas con Power Query en una nueva Tabla (TablaAnexar) en la Hoja...

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í

 

[josecroft]

Buenas @josecroft y @FGV , una forma es recorer las tablas con for each

saludos

Interesantísima...

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í

 

[josecroft]

Otra más:

Private Sub CrearListbox()
With Hoja4
   Hoja2.ListObjects("TablaHoja2").DataBodyRange.Copy .Range("G" &...

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í

 

[josecroft]

Las tres respuestas funcionan perfectamente.

He elegido como solución la de @Macro Antonio porque es la que más se ajustaba al código que ya tenía, pero he tomado nota de las...

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í