MAS DE 10 COLUMNAS EN LISTBOX

09/10/2004 - 03:10 por Jorge | Informe spam
Buen día,

solicito apoyo para dar entrada a mas de 10 columnas a un
Listbox.

De antemano gracias.
Saludos.
 

Leer las respuestas

#1 Héctor Miguel
09/10/2004 - 10:38 | Informe spam
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.

Preguntas similares