Transfer Data From Userform to Worksheet

[ScotyB]

Hi all,

with little or no experience in VBA, I have been able (barely) to set up a user form to display data based on some named ranges on the Dropdowns sheet.

Names is a combo box
Date is a text box
Core Skills is a combo box
Topics is a combo box
General Comments is a text box
Instructor is a combo box

I figured out to get the cancel button on the user form to work but, even after searching the intertubes for examples, can't get the data to transfer from the user form to the spreadsheet via the 'submit' command button, with each record being transferred to a new row - I seem to get a lot of 'runtime' errors or 'object not found' errors.

I apologise if this has been covered before but could someone help with this one?

Cheers,

AJ

[tigeravatar]

ScotyB,

There's a reason its good practice to name your controls and variables with easily recognized names. Leaving them as TextBox1, ComboBox2, etc is very confusing. I made a list of what is what and where it goes, then used that information for the submit button code:

Private Sub CommandButton1_Click()

'List of items, where they go, and what control they use
'Item           Column  Control
'Name           A       ComboBox4
'Date           B       TextBox1
'Core Skills    C       ComboBox1
'Topics         D       ComboBox2
'Comments       E       TextBox2
'Instructor     F       ComboBox3

    Dim NewRow As Long: NewRow = Cells(Rows.Count, "A").End(xlUp).Row + 1
    Range("A" & NewRow & ":F" & NewRow).Value = Array( _
        Me.ComboBox4.Text, _
        Me.TextBox1.Text, _
        Me.ComboBox1.Text, _
        Me.ComboBox2.Text, _
        Me.TextBox2.Text, _
        Me.ComboBox3.Text)

End Sub

[ScotyB]

tigeravatar,

thank you very much - that worked a treat!

Cheers,

AJ