looping controls on userforms

Cbrehm · #1 05-10-2011, 03:54 AM

Excel 2002

On a userform I have some Textboxes, listboxes, etc that I want to set .value=empty

Currently I do it by
'clear some values

Code:

TSEFAN.Value = empty
    TSEFPD.Value = empty
    TSEFAP.Value = empty

Now I have tried,

Code:

Sub controlempty(formname As MSForms)
    'pass form name to use

Dim cCont As Control

    For Each cCont In formname

        .Value = Empty

    Next cCont

End Sub

then in the code for saving the data I have the line

Code:

controlempty ADDCORT

ADDCOURT is the name of the form

get error "Expected user-defined type, not project"

Help Thanks

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
how to use Building Blocks or controls to add a page	verbster	Word	11	03-06-2011 04:05 PM
Grouping Content Controls	cksm4	Word VBA	2	03-01-2011 12:46 PM
Format picture controls are acting weird.	WaltR	Drawing and Graphics	1	02-11-2011 02:47 PM
hide ghosted controls	designer	PowerPoint	1	01-03-2011 07:11 AM
Can't Download Controls	BillTheAdmin	Project	2	12-05-2005 10:20 AM