Your a STAR, I can see me using this one quite alot at the moment, people
seem to struggle with 20+ cells to fill in but can hadle a form with 5 at a
time, so from everyone at work,
Cheers, lots good times going you way.
Chris

"Henry" wrote in message
...
Chris,

Private Sub ComboBox1_Change()
Sheets("Sheet1").Range("A1") = ComboBox1.Value
End Sub

HTH
Henry


"Chris A" wrote in message
s.com...
How do i get my choice from a combobox on a user form to a cell in the
worksheet additionally how to do this with a number of cells in one row
then
repeat for the row below.
do i need anyhitng in the cells to accept the .value = "whatever"
TIA