Actividad pública reciente
Ha valorado "Excelente" la respuesta
Pasar los datos del lisbox1 a una hoja de excel
Utiliza este código: Sub vaciar() Dim n As Long Dim c As Long c = 15 For n = 0 To (ListBox1.ListCount - 1) c = (c + 1) Range("D" & c).Value = ListBox1.List(n, 0) Range("E" & c).Value = ListBox1.List(n, 1) Range("F" & c).Value = ListBox1.List(n, 2)...