Userform to Worksheet value transfer

[ipbr21054]

Afternoon.
Please could you advise a basic could to transfer values from userform to worksheet.
Some infor for you.

Worksheet called HONDA SHEET
ComboBox1.Value to Cell B21
TextBox1.Value to Cell C21
TextBox2.Value to Cell D21
ComboBox2.Value to Call E21
ComboBox3.value to Cell F21


Here is my attempt but keep getting different RTErrors

Private Sub CommandButton1_Click()
    With ThisWorkbook.Worksheets("HONDA SHEET")
         .Range("B21") = ComboBoxBox1.Value
         .Range("C21") = TextBox1.Value
         .Range("D21") = TextBox2.Value
         .Range("E21") = ComboBox2.Value
         .Range("F21") = ComboBox3.Value
   End With
End Sub

 

[EFANYoutube]

Hi ipbr

Try this

Private Sub CommandButton1_Click()
    With ThisWorkbook.Sheets("HONDA SHEET")
         .Range("B21") = Me.ComboBoxBox1.Value
         .Range("C21") = Me.TextBox1.Value
         .Range("D21") = Me.TextBox2.Value
         .Range("E21") = Me.ComboBox2.Value
         .Range("F21") = Me.ComboBox3.Value
   End With
End Sub

 

[My Aswer Is This]

I believe the problem could be this line:
.Range("B21") = ComboBoxBox1.Value
I think it should be:
.Range("B21") = ComboBox1.Value
I would think you would not have a Combobox named:
ComboBoxBox1
See you have: BoxBox1

 

[ipbr21054]

You are correct and i did spot that.
Now changed the code works great.

Have a nice day

 

[My Aswer Is This]

You are correct and i did spot that.
Now changed the code works great.

Have a nice day

Are you referring to my post?

 

[ipbr21054]

Yes to yours as i made a type.

& thanks to both of you for the help

 

[My Aswer Is This]

Yes to yours as i made a type.

& thanks to both of you for the help

OK. Yes Me is not required.
Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.