I have found some code to copy a cells data to a textbox as shown below. what
I require is the reverse, to copy the textbox data to a cell?

Private Sub Commandbutton1_click()
worksheets("Sheet2").Textbox1.Text = _
Worksheets("Sheet1").Range("B9").Text
End sub

I am using excel 2000