Hello all,
I have this code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [H16]) Is Nothing Then
If [H16] < -9.99 Then
[I1].EntireColumn.Hidden = False
Else: [I1].EntireColumn.Hidden = True
End If
End If
End Sub
It works perfectly, but I...