UserForm textbox to textbox in sheet

[KlaasE]

Hello there,

I'm pretty new with VBA and I am trying to make a Userform to add comments to an excel sheet.
I have a combo box with initials (of the person making the comment) and a text box where they will write the comment.
Now if the person clicks the OK button I want it to start a new line with Initials, the date, and the comment.
For instance:

04-11-2019 - EL: Order has been moved to Friday.
05-11-2019 - SK: Order is done.

Any help is appreciated.
Thanks in advance!

 

[Fluff]

Hi & welcome to MrExcel.
How about something like

Private Sub CommandButton1_Click()
    Range("A" & Rows.Count).End(xlUp).Offset(1).Value = Format(Date, "dd-mm-yyyy") & " - " & Me.ComboBox1.Value & ": " & Me.TextBox1.Value
End Sub

 

[KlaasE]

Hi there Fluff,

Thanks for the quick reply!
It does everything perfectly, except it puts the comments in a cell. Is there a way to make them appear in a text box?

 

[Fluff]

In your op you said to add the comments to an Excel sheet.
So what is the textbox name & where is it?

 

[KlaasE]

I see I did say that. The textbox is named CommentBox on Sheet1.

 

[Fluff]

Ok, how about

    Sheets("sheet1").CommentBox = Format(Date, "dd-mm-yyyy") & " - " & Me.ComboBox1.Value & ": " & Me.TextBox1.Value

 

[KlaasE]

With above code I receive the following error: This property or method is not supported by this object.

 

[Fluff]

Is it an ActiveX or Forms Control Textbox?

 

[KlaasE]

I believe it's a Forms Control Textbox.

 

[KlaasE]

It was indeed a Forms Control Textbox. I switch it with an ActiveX Textbox and it works.

Thank you for your help!