MAS DE 10 COLUMNAS EN LISTBOX

hola, Jorge !

... dar entrada a mas de 10 columnas a un Listbox.

suponiendo que...
-> el listbox esta en un formulario
-> las entradas se 'toman' [a partir] de la celda 'A1' [la region adyacente]
-> la primer fila son 'titulos'...
en el modulo de codigo del formulario ==Private Sub UserForm_Initialize()
With Range("a1").CurrentRegion
With .Offset(1).Resize(.Rows.Count - 1)
ListBox1.ColumnCount = .Columns.Count
ListBox1.List = .Value
End With
End With
End Sub

saludos,
hector.

Héctor,

No puedo añadir mas de 10 columnas a un listbox. este se
encuentra en un formulario en excel.

Tendrás otra forma de hacerlo ?

De antemano gracias.
Un saludo

hola, Jorge !

... dar entrada a mas de 10 columnas a un Listbox.

suponiendo que...
-> el listbox esta en un formulario
-> las entradas se 'toman' [a partir] de la celda 'A1'

[la region adyacente]

-> la primer fila son 'titulos'...
en el modulo de codigo del formulario ==>Private Sub UserForm_Initialize()
With Range("a1").CurrentRegion
With .Offset(1).Resize(.Rows.Count - 1)
ListBox1.ColumnCount = .Columns.Count
ListBox1.List = .Value
End With
End With
End Sub

saludos,
hector.
.