Where you're trying this code and are you sure you have enough items?

See http://www.vb-helper.com/tip_set_combo_item.html

>I am passing in the key of the item in the combo box I want to show:
>
>

>If iSalespersonKey <> 0 Then
>
>    Dim iIndexNum As Integer
>    Dim iItemKey As Integer
>    
>    For iIndexNum = 0 To cboSalespersons.ListCount - 1
>    
>        iItemKey =Me!cboSalespersons.Column(iIndexNum, 0)
>    
>        If iItemKey = iSalespersonKey Then
>        
>            'Me!cboSalespersons.ListIndex = iIndexNum
>        
>        End If
>
>    Next
>    
>End If
>

>
>I cannot get this to work. I have tried numerous ways. I'm not sure the syntax is correct. Can someone point me in the right direction?