pedie
Well-known Member
- Joined
- Apr 28, 2010
- Messages
- 3,875
Looking to add comment using textbox2 value as comment and textbox1 value/text be added to range A1. however it is not working so far....
Please suggest:
Private Sub CommandButton1_Click()
Range("A1").Value = TextBox1.Value
With Range("A1")
.AddComment.Text Text:=Application.UserName & Chr(10) & TextBox2.Text & Chr(10) & ""
End With
End Sub
Please suggest:
Private Sub CommandButton1_Click()
Range("A1").Value = TextBox1.Value
With Range("A1")
.AddComment.Text Text:=Application.UserName & Chr(10) & TextBox2.Text & Chr(10) & ""
End With
End Sub