Clearing textboxes

eddd82 · May 9th, 2002, 03:36 AM

Just wondering is there a way you can set the contents of all text boxes to an empty string in a form when it is activated. Obviously you can do each individually but is there a way u can do it with a loop etc. Cheers.

Mudface · May 9th, 2002, 03:40 AM

Try something like this: -

Private Sub UserForm_Initialize()

Dim ctl As Control

For Each ctl In Me.Controls
If TypeName(ctl) = "TextBox" Then ctl.Text = ""
Next ctl

End Sub

eddd82 · May 9th, 2002, 03:44 AM

Works perfect thanks for the quick reply.

May 9th, 2002, 03:36 AM	#1
eddd82 Board Regular Join Date: Apr 2002 Location: Ireland Posts: 107	Just wondering is there a way you can set the contents of all text boxes to an empty string in a form when it is activated. Obviously you can do each individually but is there a way u can do it with a loop etc. Cheers. __________________ [Brian]

May 9th, 2002, 03:44 AM	#3
eddd82 Board Regular Join Date: Apr 2002 Location: Ireland Posts: 107	Works perfect thanks for the quick reply. __________________ [Brian]

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

May 9th, 2002, 03:40 AM	#2
Mudface MrExcel MVP Join Date: Feb 2002 Location: Sunny, spring-like Hull Posts: 3,339	Try something like this: - Private Sub UserForm_Initialize() Dim ctl As Control For Each ctl In Me.Controls If TypeName(ctl) = "TextBox" Then ctl.Text = "" Next ctl End Sub