How do I loop through the values in a combocox?

[dogdays]

I have a combobox with three columns of data, I wish to loop through each row to find a particular value in the first column. I tried the following:

Private Sub Form_Current()
    Dim iIndex As Integer
    
    For iIndex = 0 To Me.cboRelationshipTypes.ListCount - 1
        If Me.cboRelationshipTypes(iIndex).Column(0) = 7 Then
            Me.cboRelationshipTypes.ListIndex = iIndex
            Exit Sub
        End If
    Next iIndex
End Sub

The line in blue gives me a Type Mismatch error. Any help would be appreciated.

Jack

 

[jackd]

What are you trying to do? Forget Access for the moment, just in plain english tell us the issue. Maybe there are other approaches.

 

[xenou]

Seems like you can just use the value:

Me.ComboBox1.Value = 7

Then you're on that row.

As above --> what's the ultimate aim...

 

[dogdays]

I was trying to validate data in an existing table. Accomplished in a different way. Thanks for the comments.

Jack