shrekut,

if b10 or D10 are part of the source datafor the combo box you quite
likely will get into a loop.

Try something like this:

Private Sub ComboBox1_Change()
application.enableevents = false
ComboBox1.Width = 89.25
ComboBox1.BoundColumn = 2
Range("B10").Value = ComboBox1.Value ' Description
ComboBox1.BoundColumn = 5
Range("D10").Value = ComboBox1.Value ' Price
application.enableevents = false
End Sub


---
Message posted from http://www.ExcelForum.com/