Ciao a tutti, ho un problema con una casella combinata in quanto non riesco a fare il percorso inverso cioè avendo gli ID evidenziare I nomi contenuti nella casella combinata.
Con questo codice prelevo dalla casella combinata i nomi che mi interessano ed il punteggio relativo al nome e tutto funziona perfettamente.
.
.
.
For intSelection = 0 To Me.els_nomi.ListCount - 1
If Me.els_nomi.Selected(intSelection) Then
.MoveLast
id = !ID + 1
.AddNew
!ID = id
!Nome = Me.els_nomi.Column(1, intSelection)
!punteggio = Me.els_nomi.Column(2, intSelection)
.MoveLast
End If
Next intSelection
.
.
.
Ora io avendo gli id vorrei evidenziare I nomi relative quindi dovrei fare la strada inverse ossia scorrere tutti I nominative e confrontare l’ID del nominative caricato nella casella di riepilogo con l’ID salvato in precedenza ma non riesco a farlo.
HO provato con:
.
.
.
For i = 0 To Me.els_nomi.ListCount - 1
If Me.els_nomi.Column(1, value) = ID (salvato in precedenza che recupero mediante query) Then
Me.els_nomi.Selected(intSelection)=1
End If
Next
.
.
.
Ma non funziona.
Come devo scrivere questa parte di codice?
Grazie.