Private Sub CommandButton1_Click()
With Sheets(1).Range("C1")
.Value = .Value + Val(TextBox1)
End With
End Sub
Wow Guys!
Thanks I actually left my computer and went to out of the house. Yeah! I didn't realize how fast people respond. I just got back. Thanks once again. Next time, I'll stay close to the computer after a post.