Pasar items a un listbox multicolumna

Hola tengo un Userform con un textbox1 y un listbox1.Necesito ir añadiendo al listbox lo que hay en el textbox . La cuestión es como se hace para:- Primero pasar lo escrito a la columna 2 del listbox y segundo que vaya introduciendo en la columna 1 un numero que numera lo escrito.(1º-., estaría en la col 1, texto en la colm 2, y asi sucesivamente )

Puedo adjuntar archivo para un mejor entendmiento.

1 Respuesta

Respuesta
1

Este sería el código, suponiendo que después de escribir en el textbox1 presionas un commandbutton

Private Sub CommandButton1_Click()
    ListBox1.ColumnCount = 2
    ListBox1.AddItem ListBox1.ListCount + 1 & "º-."
    ListBox1.List(ListBox1.ListCount - 1, 1) = TextBox1 'este es para agregar en columna2
End Sub

Saludos.Dam
Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas