Access VBA form controltype subroutine

I'm trying to loop through my form and enable all textboxes. I have this code:
Private Sub subIntitializeTextBoxes()
'declare a control object variable
Dim ctl As Control

'Loop thru the Controls collection
For Each ctl In Me.Controls
If Me.ControlType = acTextBox Then
MsgBox ("Text Box")
End If
Next ctl
End Sub

My first problems is on the line:
If Me.ControlType = acTextBox Then

on execute I get the error Method or data member not found. The examples I've seen use this method. I'm missing something.

Thanks,
Brooks

Microsoft Access

Last Comment

Dale Fye

8/22/2022 - Mon

ASKER CERTIFIED SOLUTION

Dale Fye

12/31/2013

THIS SOLUTION ONLY AVAILABLE TO MEMBERS.

View this solution by signing up for a free trial.

Members can start a 7-Day free trial and enjoy unlimited access to the platform.

See Pricing Options

Start Free Trial

GET A PERSONALIZED SOLUTION

Ask your own question & get feedback from real experts

Find out why thousands trust the EE community with their toughest problems.

Boyd (HiTechCoach) Trimmell, Microsoft Access MVP 2010-2015

12/31/2013

TIP: In your code the Me refers to the form object.

Try:

'Loop thru the Controls collection
For Each ctl In Me.Controls
    If ctl.ControlType = acTextBox Then
           degug.print "Text Box: " & ctl.Name  ' prints to the immediate window
           ctl.Enabled  = True
    End If
Next ctl
End Sub

Open in new window

gbnorton

12/31/2013

ASKER

Thanks Fyed

Dale Fye

12/31/2013

you are welcome.

Happy New Year!

Experts Exchange is like having an extremely knowledgeable team sitting and waiting for your call. Couldn't do my job half as well as I do without it!

James Murphy

Plans and Pricing

Resources