Your code works for me. Try with the first line:

Dim c As Range

It may help. In any event, it's very bad programming practice not to declare
your variables explicitly.

--

Vasant

"reb" wrote in message
...
i can send a text value ,but not a number value to my worksheet, here the
code:
Private Sub TextBox1_change()
Set c = Worksheets("Sheet1").Range("a2")
c.Value = TextBox1
help???