Deselezionare tutti i valori di una combobox a selezione multipla

Question

Salve,

volevo chiedere gentilmente un consiglio/aiuto se possibile. ho una combobox a selezione multipla (collegata a un campo della tabella associata alla maschera) e vorrei creare un tasto che mi deselezioni tutte i valori selezionati in questo controllo.

Ho provato con:

Function deseleziona_tutti_i_valori()

Dim n As Integer

For n = 0 To Me.cmb_valori.ListCount

Me.cmb_valori.Selected(n) = 0

Next

End Function

ma non funziona. qualcuno sa dirmi perchè o ha un suggerimento?

Grazie

Alessandro

Answer 1

Ciao Alessandro,

mi sembra di capire che stai utilizzando un campo multivalore che ti consente una combobox a selezione multipla. Se è questa la situazione ti chiedo scusa ma non ho mai utilizzato questo tipo di campo perchè sono della vecchia guardia e risolvo questo tipo di problemi in fase di normalizzazione del Db.

Alla prossima

Mimmo

Answer 2

ciao,

scusami mi ero sbagliato.
l'ho riprovato ora e mi sono accorto che non sembra funzionare, cioè non mi deseleziona alcun valore della mia combobox? Forse perchè è una combo che consente più selezioni?

Grazie e scusa

Alessandro

Answer 3

Ciao,

prova con

Dim varitem As Variant

For Each varitem In Me.lst_Elenco.ItemsSelected

Me.lst_Elenco.Selected(varitem) = False

Next

Ciao Mimmo

grazie mille! perfetto!
scusa se rispondo solo ora

Answer 4

Ciao,

prova con

Dim varitem As Variant 

For Each varitem In Me.lst\_Elenco.ItemsSelected 

    Me.lst\_Elenco.Selected(varitem) = False 

Next 

Ciao Mimmo