Copy from VBA combo box to sheet cell

[Bozzy]

If i have a combobox called 'cbTutor' in a form called 'frmNew' on vba on execl. How would i copy the data from that combobox and paste it into an empty cell (A6) on the spreadsheet when i click the submit button


i need to do this for multiple combo boxes and text boxes but im sure i can figure out how to do those after being given the code for this 1 thanks for any help

 

[Bozzy]

Nevermind solved myself

 

[Bozzy]

I take that back some reason the code:
Sheets("Overview").Select
cbTutor.Copy
Range("B6").Select
ActiveSheet.Paste

works fine but as soon as its a text box i copy from

The range is change to A6 and nothing else changes it doesnt work. whats wrong?

 

[sage_bob]

Hi Bozzy,

Have you tried
Range("B6").Value = cbTutor.Value

If the combo box has two columns you could also try:
Range("B6").Value = cbTutor.List(cbTutor.ListIndex, 1)
The above gets the value from the 2nd (zero based) column of the combo box.

Hope that helps.

 

[Bozzy]

Basically what it does is adds a new line, add's data into the new cells then sorts it, so if i simply told it to read from the cell it wouldnt work after sorting the data or adding a new line of data after in cell A6 as it would read the new information i input next time, not what i type in originaly the time before. so i preferably need it to copy and paste

Also i should add that if u use the same code for the text box that i used to copy and paste from the combo box it simply still copies and pastes from the 2nd combo box on my sheet rather than the text box even tho i changed the cbTarget.Copy (thats the name of the 2nd combo box, cbTutor is the first) to txtName it still does it =/

 

[Bozzy]

I forgot that the procedure wouldnt be constantly running so it wouldnt always be setting the text box's value as A6 so yeah i took your idea in a more simple form which worked thanks

After a rather complicated sort system lol. your help was a great help thanks alot!