Thread: Command Buttons
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
JE McGimpsey JE McGimpsey is offline
external usenet poster
 
Posts: 4,624
Default Command Buttons

I'd suggest you just use two subs


Private Sub Button1_On()
Me.CommandButton2.Enabled = False
Me.CommandButton1.Enabled = True
End Sub

Private Sub Button2_On()
Me.CommandButton1.Enabled = False
Me.CommandButton2.Enabled = True
End Sub

that you call from the "different procedures", e.g.:

Private Sub UserForm_Initialize()
'Stuff here
Button1_On
End Sub

Private Sub CommandButton1_Click()
'Do more stuff
Button2_On
End Sub

Private Sub CommandButton2_Click()
'Do even more stuff
Button1_On
End Sub


In article ,
ranswrt wrote:

I turn the buttons on and off with different procedures on the userform. i
was wondering in there was an event procedure that would make sure that only
one button was on at a time.