Worksheet_Change Add and remove button In Next Cell Based on Cell Value

[mbrunstad]

I am trying to make it where Anytime you enter the number 100 or more in Range G4:G11 a button assigned the same macro is added to the next cell and fits.

When you delete the value in Column G or it is under 100 it deletes the button in column H.

Please, Please Help.

Thank you, In Advance

 

[mikerickson]

What would be in column H if not the button?

My thinking is that it would be a smoother interface if putting 100 (+) in column G resulted in a format/text change in column H. But no Button.
Double clicking on column H would check to see if its next to a 100, if so, run the macro, if not do nothing.

Adding and removing shapes frequently can result in bloated files and increases instability.

 

[mbrunstad]

It Could just say yes. How would I code to do that?

 

[mikerickson]

Put this in the sheet's code module.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column = 8 Then
        If Val(CStr(Target.Offset(0, -1).Value)) >= 100 Then
            Cancel = True
            ' code to run
        End If
    End If
End Sub