Change font colour on Button on opening

[lesley burlingham]

I have a button (Button 5459) on my sheet, I would like the button to be disabled when the spreadsheet is opened and the texted to be gray.

I then need the box to be enabled once a value >1 is entered to O42 and the texted on the button (Button 5459) to become black.

Apologies if I have put this into the wrong place on the forum.

 

[Luke M]

Hi lesley,

I'm going to presume that the this is an ActiveX Command button, and not a Forms button, as the latter can't be disabled. If not, please insert this button


Anyway, once you have it in place, two bits of code. In the ThisWorkbook module:

Private Sub Workbook_Open()
Worksheets("Sheet1").CommandButton1.Enabled = False
End Sub

In the sheet module for the button (where cell O42 is)

Private Sub Worksheet_Change(ByVal Target As Range)
Me.CommandButton1.Enabled = (Range("O42").Value > 1)
End Sub

Note that disabling a button automatically turns the font gray, and vice versa.

 

[lesley burlingham]

Hi

Thank for your response. I am having to use a form control button as for some reason I cannot insert an active x object into excel. If I can't change a for control button I will have to find another way around.

 

[NARAYANK991]

Hi Lesley ,

See the attached file.

Narayan