View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default Reset 108 text boxes

Dim ctl as Control
for each ctl in Userform1.controls
if typeof ctl is MsForms.TextBox then
ctl.Value = ""
end if
Next

--
Regards,
Tom Ogilvy

"Tempy" wrote in message
...
Hi all,

I need to reset 108 text boxes, is there a way to do them all at once
without unloading the form ?

Tempy

*** Sent via Developersdex http://www.developersdex.com ***