COPIAR DATOS DE LISTBOX
Publicado por Michael Elvis (16 intervenciones) el 26/12/2020 19:00:12
Primero desearles una Feliz Navidad todos, tengo un código que pasa todos los datos del Listbox1 al Listbox2, pero el problema es que mi listbox1 tiene 3 columnas y solo pasa del Listbox1 al Listbox2 la primera columna, como podría hacer para que me pase las 3 columnas??.
Aquí les dejo el código fuente:
Aquí les dejo el código fuente:
1
2
3
4
5
6
7
8
9
10
11
Private Sub Cmb_PasarT_Click()
Dim i As Integer
If ListBox1.ListCount >= 0 Then
For i = 0 To ListBox1.ListCount - 1
ListBox2.AddItem (ListBox1.List(i))
Next i
ListBox1.ClearEnd If
End Sub
Valora esta pregunta
0