Hi,

I've created a button to allow a user to add comments to a protected
sheet. I have this code below:

Sub Add_comment()
Dim comment As Variant
ActiveSheet.Unprotect Password:="55555"
comment = InputBox("Enter Date Here")
If comment = False Then Exit Sub
ActiveCell.NoteText comment
ActiveSheet.Protect Password:="55555"
End Sub

I would like to have two input boxes that populate one comment. I want
the user to be prompted to insert the date (or have the date
automatically pulled in) and have a second prompt that asks the user to
input the comment, so that there comment shows up with the date and
what they are saying.

Thank you,

Sean