¿Cómo puedo encontrar seleccionados los items de un listbox que guarde?

Tengo un listbox cuyas items seleccionados se guardan en una hoja excel, lo que quiero es que al volver abrir el listbox los items se encuentren ya seleccionados según lo que se encuentra guardado en la hoja excel (El multiselect esta activo por defecto);

1 respuesta

Respuesta
1

Te dejo la macro que solicitas. Ajusta el nombre del control y la referencia de dónde tomará los datos guardados, en mi ejemplo es col G de la hoja activa.

Private Sub UserForm_Activate()
'x Elsamatilde
'busca cada valor del list en col G 
For i = 0 To ListBox1.ListCount - 1
    dato = ListBox1.List(i)
    Set busco = ActiveSheet.Range("G:G").Find(dato, LookIn:=xlValues, lookat:=xlWhole)
    If Not busco Is Nothing Then
'si lo encuentra lo selecciona
        ListBox1.Selected(i) = True
    End If
Next i
End Sub

Y así es cómo se verá para este ejemplo.

nuevo manual de Userforms

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas