'Right click on sheet tab, view code, copy and modify to suit:

Private Sub Worksheet_Calculate()
Me.Shapes("Label 1").Visible = Range("A1").Value
End Sub

--
Best Regards,

Luke M
"Den" wrote in message
...
I need a macro or code that show or hidden a Label box when a condition in
a
cell X is true or false.

A will appreciate any help from you