Poner varias lineas de un Listbox a una celda combinada
publicado
Hola,
Tengo una macro que pone las lineas de un listbox a varias lineas de excel. El problema es que esas lineas las tengo minimizadas y la intención es combinar esas celdas, pero entonces solo me poone la primera linea del Listbox.
Como puedo hacerlo para que se pongan todas en la celda combinada.
Ahora tengo esto.
Worksheets("Formato Comunicación PRC").Select
Y = 27
a = ListBox1.ListCount
For i = 0 To a - 1
Hoja2.Cells(Y, 1) = ListBox1.List(i, 0)
Y = Y + 1
Next i
Gracias
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Hola,
Tengo una macro que pone las lineas de un listbox a varias lineas de excel. El problema es que esas lineas las tengo minimizadas y la intención es combinar esas celdas, pero entonces solo me poone la primera linea del Listbox.
Como puedo hacerlo para que se pongan todas en la celda combinada.
Ahora tengo esto.
Worksheets("Formato Comunicación PRC").Select
Y = 27
a = ListBox1.ListCount
For i = 0 To a - 1
Hoja2.Cells(Y, 1) = ListBox1.List(i, 0)
Y = Y + 1
Next i
Gracias