danovkos
03-19-2010, 02:20 AM
Hi all,
pls. how can i do folowing
i want to show/hide text box/label based value in cell B1.
If is there 1, textbox will appear, if is value not equal to 1, it will disappear.
I know, that it will be in ThisWorkbook in Workbook_SheetChange event, but my try doesnt Works.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Sheets("KRIZ").Label1_Click("Label1").Visible = False
If Range("k1") = 1 Then
Sheets("KRIZ").Label1_Click("Label1").Visible = True
End If
End Sub
thx for help
pls. how can i do folowing
i want to show/hide text box/label based value in cell B1.
If is there 1, textbox will appear, if is value not equal to 1, it will disappear.
I know, that it will be in ThisWorkbook in Workbook_SheetChange event, but my try doesnt Works.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Sheets("KRIZ").Label1_Click("Label1").Visible = False
If Range("k1") = 1 Then
Sheets("KRIZ").Label1_Click("Label1").Visible = True
End If
End Sub
thx for help