vorkosigan respondió:
Inserta un botón al lado del listbox y añade este código al evento Click: dim fila as integer for fila=0 to ListBox1.ListCount-1 Cells(fila+9, 1) = ListBox1.List(fila,0) Cells(fila+9, 2) = ListBox1.List(fila,1)) next El cuadro de lista se debe llamar...