Clear text from text box using VBA

[ElBenno]

Hi,
Does anyone have some code that i can assign to a button to clear the content of a text box in my worksheet?

Kindest Regards,

ben

 

[agihcam]

sheets("Sheet1").textbox1.text=""

 

[ElBenno]

sorry but that didnt work

 

[agihcam]

what is the name of your worksheet and textbox?

 

[ElBenno]

work sheet is called Breach Form, text box is called TextBox4

 

[agihcam]

then post your code from a button.

 

[ElBenno]

Private Sub Submit_Click()
Dim ws As Worksheet
Dim i As Integer
Set ws = Sheets("Register")

' Return data to the worksheet
With ws
.Range("A4") = TextBox1.Value
.Range("B4") = TextBox2.Value
.Range("C4") = TextBox3.Value
.Range("D4") = TextBox4.Value
.Range("E4") = TextBox5.Value
.Range("F4") = TextBox6.Value
.Range("G4") = TextBox8.Value
.Range("H4") = TextBox10.Value
.Range("I4") = TextBox11.Value
End With
' Clear the TextBoxes
For i = 1 To 11
TextBox(i).Value = ""
Next i

End Sub

This is comming up with the following issue: Compile Error Sub or Function not defined (on the TextBox(i).Value).

thanks