Active X Button Disabled based on Another Cell Condition

[hkelly393]

I need to enable CommandButton1 when Cell CY13 is equal to Yes. The problem is my formula is based on CountA, which I thought was going to work. Even a cell with a formula in it will trigger the button to be turned on. How can I get the following to focus on the actual value of Cell CY13 (which will have a formula to determine its value which will be either Yes or No). I don't want a range like it shows below but rather If CY13=Yes then CommandButton1 is enabled.


Private Sub Worksheet_Change(ByVal Target As Range)
CommandButton1.Enabled = False
If Application.WorksheetFunction.CountA(Range("CY:CY")) > 0 Then
CommandButton1.Enabled = True
End If

End Sub

 

[Osvaldo Palmeiro]

Try this:

Private Sub Worksheet_Calculate()
 CommandButton1.Enabled = Range("CY13").Value = "Yes" 
End Sub

 

[hkelly393]

Unfortunately that did not work for me. CommandButton1 remains disabled despite meeting the condition.

 

[Fluff]

What is the formula in CY13?