Disable Command Buttons

[CampbellC]

hi
I know how to disable command button with
cmd button .enabled = false
my Question is can I disable a selected group of buttons called cancelled with one bit of code instead of have to write them individual or from the property section select Order buttons are disabled though Property section on start up just looking for a easer way to do it

 

[Akuini]

If the buttons have sequential numbers like CommandButton1, CommandButton2,...,CommandButton5, then :

Sub try1()

For i = 1 To 5
Me.Controls("CommandButton" & i).Enabled = False
Next

End Sub

 

[Akuini]

Another option, populate the buttons name (e.g. "a", "b", "c") into an array:

Dim x
For Each x In Array("a", "b", "c")
    Me.Controls(x).Enabled = False
Next

 

[CampbellC]

my command button are name CmdSelectAord to CmdSelecford

Give me error could not find specific object
my attempt at it

guess ive written it wrong

 

[CampbellC]

For i = 1 To 5
Me.Controls("CmdSelectAord" & i).Enabled = True
Next

 

[dmt32]

my command button are name CmdSelectAord to CmdSelecford

Hi,
if you have named your commandbuttons CmdSelectAord to CmdSelectFord then try following & see if does what you want

 Dim i As Long
    For i = 1 To 6
        Me.Controls("CmdSelect" & Chr(64 + i) & "ord").Enabled = True
    Next

Dave

 

[CampbellC]

Got it working
just to be a pest what is chr 64
i just like to know how it works not just copy it
don't learn by just copying it

thanks Akuini

 

[dmt32]

Glad we were able to help & suggestion resolves

Char(64) is @ symbol in character set but you are using 64 + value of i in the For Next Loop - (65 to 70) which is A to F

You can find Character set information here: Character set (0 - 127)

Dave