Invalid Property Value ?? Check the type and value of cbMains8. To isolate
change the reference to cbMains7 and if this 'fixes' it, then defo invalid
value.

--

Regards,
Nigel




"Jim" wrote in message
...
This piece of code throws up 'error 380'

Private Sub cbMains8_Change()
cbDish8.RowSource = cbMains8 ' error produced here
cbDish8.ListIndex = -1
End Sub

This piece of code does not throw up an error

Private Sub cbMains7_Change()
cbDish7.RowSource = cbMains7
cbDish7.ListIndex = -1
End Sub

What does error code 380 indicate

TIA

Jim