One Cell that controlls spread sheet result button to change simple fomula result

NoSparks · #4 03-31-2018, 07:09 AM

If you need to change button color use ActiveX buttons,
and what you indicate can be done with just one button.

Code:

Private Sub CommandButton3_Click()
' use of only one ActiveX button
With CommandButton3
    If .BackColor = vbYellow Then
        Range("A4").Formula = "=A2/2"
        .Caption = "Current division is by 2"
        .BackColor = vbCyan
    Else
        Range("A4").Formula = "=A2/3"
        .Caption = "Current division is by 3"
        .BackColor = vbYellow
    End If
End With
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to change the formula to get this result ....	LearnerExcel	Excel Programming	2	02-11-2018 08:26 PM
Formula result not displaying in cell (but f9 works)	nath1235	Excel	4	10-06-2017 12:42 PM
How To Move Focus From VLOOKUP Result to Report Sheet	swindon.expat	Excel	2	04-10-2016 12:15 AM
Simple Spread Sheet	TThomas	Excel	1	04-07-2016 09:01 PM
Show result of formula as a value in another cell	Steve_D	Excel	4	10-12-2014 07:38 PM