disable and enable command buttons on userform

[abdelfattah]

hi,

is there any way to enable and disable command buttons for instance i have 3 command button when i run userform command1 is enable and command 2,3 are disable i succeed that but when i press command 1 it supposes enable command 2,3 and disable command 1 then when i press command 2 then enable command 1 and disable 2,3 how i can do that 2

 

[Yongle]

Try this

Private Sub CommandButton1_Click()
'enable 2 and 3
    CommandButton2.Enabled = True
    CommandButton3.Enabled = True
'disable 1
    CommandButton1.Enabled = False
End Sub

Private Sub CommandButton2_Click()
'disable 2,3
    CommandButton2.Enabled = False
    CommandButton3.Enabled = False
'enable 1
    CommandButton1.Enabled = True
End Sub

Private Sub UserForm_Initialize()
'disable 2,3
    CommandButton2.Enabled = False
    CommandButton3.Enabled = False
'enable 1
    CommandButton1.Enabled = True
End Sub

 

[abdelfattah]

thanks Yongle it works very well