Help !!! My code is not working as expected.

[Guest]

The following snippet of code is suppose to loop through all the
CommandButton controls on a Multipage control on a form and change the
Enabled property of those CommandButton to True if there is a Value in the
ComboBox "cmbDrive". Otherwise the CommadButton controls should be Disabled.

My problem is that I keep getting an "Object required" error message. I
don't know what I did wrong. If there is anyone out there that knows what is
wrong or how I can code this better, please HELP !!!

Private Sub cmbDrive_AfterUpdate()
If cmdDrive.Text <> "" Then
For Each ctl In frmOpenFiles.Controls
If TypeName(ctl) = "CommandButton" And ctl.Enabled = False Then
ctl.Enabled = True
End If
Next ctl
ElseIf cmdDrive.Value = "" Then
For Each ctl In frmOpenFiles.Controls
If TypeName(ctl) = "CommandButton" And ctl.Caption <> "Cancel"
Then
ctl.Enabled = False
End If
Next ctl
End If
End Sub

 

[Mark Lincoln]

Your statement of the problem refers to a ComboBox called "cmbDrive,"
but your code references "cmdDrive." That is, the third letter is
different. Does the code use the correct control name?

Mark Lincoln

 

[Guest]

Thanks Mike. That fixed it.

Your statement of the problem refers to a ComboBox called "cmbDrive,"
but your code references "cmdDrive." That is, the third letter is
different. Does the code use the correct control name?

Mark Lincoln

 

[Earl Kiosterud]

Ayo,

You should use "Option Explicit" at the top of all your modules. That will catch errors
like this. In the VBE, Tools - Options - Editor tab, "Require variable declaration" will
put that in all new modules, but I don't think it changes it after the modules have been
created.

--
Earl Kiosterud
www.smokeylake.com

Note: Top-posting has been the norm here.
Some folks prefer bottom-posting.
But if you bottom-post to a reply that's
already top-posted, the thread gets messy.
When in Rome...
-----------------------------------------------------------------------