combo box user form

[robert.begley1]

Hi Guys and Gals,
I have created a simple userform with three text boxes and a combo box
I have mabnaged to get the text boxes to work ok, and now have a drop down list in the combo box but I cannot figure the code to get the information from the combo box on to the spreadsheet with the command button even though i can get the textboxes to work properly code i have used for comand button is


private sub CommandButton1_Click()
Worksheets("Sheet1").Activate
erow = Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
Cells(erow, 1) = TextBox1.Text
Cells(erow, 2) = TextBox2.Text
Cells(erow, 4) = TextBox3.Text

End Sub

Thought if I add cells(erow,5)=combobox1.textthis should work, but it seems not
any help would be gratefully received
cheers
Rob

[xladept]

Maybe:

Please Login or Register  to view this content.

[jeffreybrown]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here