Hiding A Command Button

[jamesryan]

Hi,

I have a spreadsheet that has a number of command buttons on it and they all have macro's assigned to them. The macro simply puts the number "1" in a specific cell.

What i want is for each button to be hidden as soon as there is a "1" in that specific cell.

And then when i run a separate macro later to clear the "1" i want the buttons to re-appear.

Is this possible?

Thanks

James Ryan

[anilsolipuram]

I am considering that A1 is the cell where you assigning value to make command buttons hide.

You can change the address in the code


paste the below code by selecting the sheet tab ,right click-> view code



Private Sub Worksheet_Change(ByVal Target As Range)
Dim count, i, k, ne As Variant
i = 0
k = 0
ne = 1
If Target.Address = "$A$1" Then
If Range("A1").Value = 1 Then
ActiveWorkbook.DisplayDrawingObjects = xlHide
Else
ActiveWorkbook.DisplayDrawingObjects = xlAll
End If
End If
End Sub

[jamesryan]

Thanks but this doesn't seem to work.

I have 10 buttons that put the "1" in 10 separate cells. I want each one to disappear when i press the button.

The 10 cells are:

R6,R8,R10, etc.

James

[anilsolipuram]

ActiveWorkbook.DisplayDrawingObjects = xlHide ' this command will hide all command buttons.

ActiveWorkbook.DisplayDrawingObjects = xlAll ' will unhide all command buttons

You can use in your procedure the above code to solve your purpose.