Hvordan vælger man flere vrdier i sin kombinationsboks ?

Kan du ikke bruge en listboks istedet.

den har egenskaberne multiselect og selected som du kan bruge.

Niels

eksempel fra hjælpen:

I næste eksempel anvendes samme listekontrolelement, men værdierne i hver kolonne til hver markeret række på listen udskrives, og ikke kun værdierne i den bundne kolonne.

Sub AlleMarkeredeData()
    Dim frm As Form, ctl As Control
    Dim varItm As Variant, intI As Integer

    Set frm = Forms!Kontaktpersoner
    Set ctl = frm!Navne
    For Each varItm In ctl.ItemsSelected
        For intI = 0 To ctl.ColumnCount - 1
            Debug.Print ctl.Column(intI, varItm)
        Next intI
        Debug.Print
    Next varItm
End Sub

Niels