macro & comobox

[pandino]

I have a combobox with 10 items in the first line of an
excel sheet column. I'd like to create a macro to fill
active cell with a value from this combobox. How should I
do?
Thanks for support!

 

[Tom Ogilvy]

Private Sub Combobox1_Click()
ActiveCell.Value = Combobox1.Value
End Sub