¿Cómo poner el contenido de un ListBox en una celda?

Como puedo hacer que en VBA de Excel pueda colocar el contenido de un ListBox en una sola celda oprimiendo un botón, o si no que cuando lo guarde se coloque en una columna... Por ejemplo de A1 hasta abajo pero cuando oprima el botón de nuevo que se coloque en la columna B1 y así sucesiva mente...

1 respuesta

Respuesta
3

La macro siguiente pasa el contenido de un Listbox de 1 columna ubicado en un userform, a la celda E2.

Dejaste pocas aclaraciones... tendrás que adaptarla a tu modelo o enviar más detalles de lo que necesitas.

Private Sub ListBox1_Click()
'x Elsamatilde
'colocar contenido de listbox en 1 sola celda
For i = 0 To ListBox1.ListCount - 1
cadena = cadena & " " & ListBox1.List(i)
Next i
'guarda la cadena sin espacios adicionales
[E2] = Trim(cadena)
End Sub

Así sería el resultado obtenido:

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas