Agregar a un listbox un elemento a una columna

Hola Diego,

Usa la propiedad Column o List del objeto ListBox.

Este es el ejemplo que aparece en la Ayuda de Excel VBA:

'
Dim MyArray(6,3)

Private Sub UserForm_Initialize()
Dim i As Single
'The 1st list box contains 3 data columns
ListBox1.ColumnCount = 3
'The 2nd box contains 6 data columns
ListBox2.ColumnCount = 6

'Load integer values into first column of MyArray
For i = 0 To 5
MyArray(i, 0) = i
Next i

'Load columns 2 and three of MyArray
MyArray(0, 1) = "Zero"
MyArray(1, 1) = "One"
MyArray(2, 1) = "Two"
MyArray(3, 1) = "Three"
MyArray(4, 1) = "Four"
MyArray(5, 1) = "Five"

MyArray(0, 2) = "Zero"
MyArray(1, 2) = "Un ou Une"
MyArray(2, 2) = "Deux"
MyArray(3, 2) = "Trois"
MyArray(4, 2) = "Quatre"
MyArray(5, 2) = "Cinq"

'Load data into ListBox1 and ListBox2
ListBox1.List() = MyArray
ListBox2.Column() = MyArray
End Sub
'

Saludos,
KL


"diegoar" wrote in message news:

Hola,

como puedo agregar a un listbox de 3 columnas, a la 2da y 3 er columna
un elemento. Es decir quiero saber como acceder a introducir un
elemento (un item) de mas de un campo.

saludos

diego