Mostrar una Tabla Dinámica en un listbox o listview

Quiero visualizar en un listbox o listview una tabla dinámica que tengo en excel, ¿es posible hacer esto?...

Respuesta
1

Visita:

Cursos de Excel y Macros

----- --

Suponiendo que tienes tus datos y la tabla dinámica en la hoja "Hoja2".

Así se vería el listbox con los datos cargados de la tabla dinámica:

Prueba el siguiente código. Cambia "Hoja2" por el nombre de tu hoja. Cambia "Listbox1" por el nombre de tu listbox.

Private Sub UserForm_Activate()
  Dim sh As Worksheet
  Dim tbl As PivotTable
  Dim rng As Range
  Set sh = Sheets("Hoja2")
  Set tbl = sh.PivotTables(1)
  Set rng = tbl.TableRange1
  With ListBox1
    .ColumnCount = rng.Columns.Count
    .List = rng.Offset(1).Resize(rng.Rows.Count - 2, .ColumnCount).Value
  End With
End Sub

--------------------------

Recomendaciones:

curso de macros. Cargar datos filtrados en un listbox. vba matrices. - YouTube

Excel Permitir solamente números en un TextBox - YouTube

Curso de macros. Consejos para empezar a programar. - YouTube

Curso de excel. Consejos y trucos de excel para mejorar la presentación de tus datos. - YouTube

----- --

Sal u dos Dante Amor

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas