Looping through form controls (2000)

Topic

New Reply

Is there a better way to loop through the textboxes in a userform and change their values? This is the only way I could get it done.

For Each Control In Entry.Controls
    If Left(Control.Name, 4) = "Text" Then
        Control.Value = ""
    End If
Next

Reply | Quote

Replies

There is a TypeName Function which you can use as follows :

For Each Control In Entry.Controls
If TypeName(Control) = “TextBox” Then
Control.Value = “”
End If
Next

Andrew C

Reply | Quote

Thanks Andrew, I picked that up from a link in a search. I take it there is no way to do the following:

Dim tob as Textbox
For each tob in Userform1.Controls
tob.Value=””
Next

Thanks,

Reply | Quote