Seleccion Multiple en Excel – Ejemplo

Requiere un Formulario y dentro un listbox y boton

Private Sub cmdSalir_Click()
fila = 2
For i = 0 To listmeses.ListCount – 1
If listmeses.Selected(i) Then
Cells(fila, «A») = listmeses.List(i)
fila = fila + 1
End If
Next i
Unload Me
End Sub

Private Sub UserForm_Initialize()
listmeses.RowSource = «tblmeses»
End Sub

Patrocinado por:

Libertad Financiera en 90 dias!

3 opiniones en “Seleccion Multiple en Excel – Ejemplo”

  1. Muy bueno, pero necesitariamos ver como se puede hacer el formulario, creo que decia que esto es necesario.

    Como puedo obtener la plantilla?
    Gracias.
    Un saludo

  2. Queria aplicarlo en un inventario para poder seleccionar copiar y pegar los codigos de los productos y pasarlo a una hoja de compra.
    Es factible esta opción?
    Un saludo

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *